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Probamo a 
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AMPLIA EL BASIC 
DE TU CPC464 
CON LOS COMANDOS: 
FILL, GET, SETCLOCK 
y OTROS MEDIANTE 
EL USO DEL 
SISTEMA RSX 
AMPLlACION DE MEMORIA 
PARA EL 664 HASTA 256 K 
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CUATRO EN RAYA: 
INTELIGENCIA EN 3D 
SOFTWARE 
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Dragontorc de A va/on, 
el regreso del 
mago Maroc desde 
el corazón del bosque 
de W;spwood Forest 
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Si quieles un ordenador de «und pieza» piensa 

 en el AMS TRA O CPC 464. Tendrás un 
ordenador de una vez por todas. GraCias a sus 
64K RAM Y J2K ROM ya sus casi ¡/irmtadas 
posibilidades de creCimiento. tienes garantizado 
que el oldenador CPC 464 no se te quedará 
pequeño. 


COMPLETO 


Ademds. gl aClas a su monitor (color o fósforo 
verde) de alta resoluCión (hasta 640 x 200 p,xels 
dlreéClonados mdiv,dualmente) y a su unidad de 
cassette incorpordda ,¡/ teclado, podr,ís dlsfrutdr 
de tu AMSTRAO de una manera mdependlente. 
prescindiendo del telev,sor y del rad,ocassette 
de tu casa (a veces tan solicitados) 


¡ y QUE ME DICES DE LOS 
PROGRAMAS? 


Actudlmente ya hay Cientos de ellos 
disponibles en España. Sm olvidar que son vanas 
las revistas dedicadas sólo a AMSTRAO y que el 
número de /¡bros y penféricos del CPC 464 
crecen dia a dlil. potenciando asi la creatividad de 
tu oldenador personal 
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CARACTERISTlCAS TECNICAS 


- Mk:roprocesador 280 (4MHz) 
- Memona de 64K RAM Y 32K ROM 
- Gla(¡cos de alta lesoluelón de hasta 640 por 
2{)() plxels dlreccionables mdlvldualmente, 
- Umdad de cassette mcorporada en el teclado. 
Monitor color o fosforo verde mcluido en el 
Sistema. 
- Texto en pantalla de 20.40 y 80 columnas por 
25 lineas. 
- LOCOMOTlVE BASIC ampliado, 
Paleta de 27 wlores y efectos de «flash.. 
- Teclado profesional tipo QWER TY con 
bloque numérico y teclas para cursol 
,{¡dependientes, 
- Salida CentlOmcs paralelo, 
- Lector de d,scos de J" (180K por cara) 
opcional (con CPlM y Dr. LOCO mclVldos 
lunto a la unidad de disco). 
- Manuales en cdstellano. 


Al comprar tu ordenador CPC 464, 
AMSl RAD ESPAÑA te obsequid con 8 cassettes 
de programas y ell,bro .cVl;1 de Referencia 
BASIC para el programado!". 
EXlje la GARANTIA AMSTRAD 
ESPAÑA UNICA VALIDA PARA 
ACCEDER AL SERVICIO TECNICO 
OFICIAL. 


PRECIO: 
66.900 ptas. 


(monitor fósforo verde) 
95.900 ptas. 


(monitor color) 
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TARJETA DE SUSCRIPCION AHORRO/REGALO 


(Si lo {Jrefieres suscríbete por teléfono (91) 733 50 12 (91) 733 50 16) 
Oferta especial para recibir en tu domicilio. todo un año la revista semanal 
Microhobby AMSTRAD 
con un descuento de 1.600 ptas., iy el regalo de una cinta 
original por valor de 2.100 ptas.! 
FECHA LIMITE DE RESPUESTA: iSENALA EL NOMBRE DE LA CINTA QUE 
30 DE NOVIEMBRE DE 1985 PREFIERES Y LA RECIBIRAS EN TU CASA, 
¡RESPONDE HOY MISMO! GRATIS, A VUELTA DE CORREO! 
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I)eseo suscrtbi/me a Microhobby AMSmAD durante un año por solo 5,900 ptas., lo que me supone un ahorro de 1.600 ptas. 
rl prtmer número que deseo recibir es el 
I nvienme GRATIS la cinta de progri1mas que le mdlco con una (X) 
O Beach Head O Combat lynx O D,T, Decathlon 


NOMBRE 
APELLIDOS 
DOMICILIO 
CIUDAD 
C. POSTAL 


EDAD 


PROVINCIA 
PROFESION 


Iya contra una 
burrido, pero si el 
iveles de destreza y el 
'ridimensional formada 
s, la cosa cambia. 


TELEFONO 


Mmco con una (X) en el c3slltcro correspondiente la lorma de pago que más me conviene. 
O Talón bancarioad,unto a nombre HOBBY PHESS, S. A. O Giro Postal N.o 
primer número, junto a la casselle regalo. O VISA N ' 
Fecha rie Ci1dllCldad de la tarleta 


o Conlra reembolso riel 
O MAS TER CHARGE N," 


Firma' 


¡-u
... NtXI. Su potencia y posibilidades 
aumentan mediante la técnica de anidamiento, 
profusamente estudiada en este número. 


Presidente 
Marío Andrino 
Consejero Delegado 
José 1. Gómez,Cenlurión 


Jefe de Publicidad 
Concha Gutiérrez 
Publicidad Barcelona 
Jos" Galón Cortes 
Tel: (93) 303 10 22/313 71 62 


Mr. Joystick 14 
El mago Maroc ha regresado del bosque y se 
enfrenta a las fuerzas del mal con ayuda de sus 
hechizos y la sabiduría adquirida tras largos 
años de solitaria meditación. 


Secretaria de Dirección 
Mariso Cogorro 
Suscripciones 
M. o Raso Gonzolez 
M. e del Mar Calzada 


Redacción, Administración 
y Publicidad 
La Granja, sin 
Poli'Jono Industrial de Akobendos 
Tel.: 654 32 11 
Telex: 49480 HOPR 


/ 


Oto. Circulación 
Corlos Pero padre 
Distribución 
Coedis, S. A. Volencia, 245 
Borcelono 


, '. 


0\ 

 


, \ 


U-' 


Imprime 
ROTFDIC, S, A, Crto. de Irun. 
Km. 17,450 (MADRID) 
Fotocomposición 
Navocomp, S.A. 
Nicolós Morales, 38-40 
Fotomecánico 
, GROF 
Ezequiel Solano, 16 
Depósito Legal: 
M-28468,1985 
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Derechos exclusivos 
de lo revista 
COMPUTING with 
the AMS1:RAD 


' 8 Banco 
'1 de pruebas 
Amstrad ha lanzado al mercado un 
ordenador personal especialmente diseñado 
para el proceso de textos en español, sin perder 
por ello un ápice de su potencia como 
computador de «propósito genera!». En 
esta primera toma de contacto, banco de 
pruebas intenta dar una visión de conjunto de 
sus posibilidades. 


Repre')
nlonh' paro Argenhna, Chila, 
Uruguay y Paraguoy, (¡el 
AHINicono dl2 Ediciones, S.R.L. Sud 
Americo 1.532, Te!.: 21 246-1, 1209 
BUENOS AIRES IArgenlino;, 
M. H. AMSTRAD no '" hoc<: 
nccesariamente solidario de los 
opiniones vcrhdas por sus 
coloboradores en los artkulos 
f,rm(Jdo
. Re
Nllodos Iodos 105 
derechos. 
Se sollcilaro control OJD 


... . Análisis 
Los algoritmos de ordenación, de cadenas 
alfanuméricas y de números, constituyen un 
capítulo muy importante de la programación, 
porque tarde o temprano tendrán que ser 
utilizados en algún programa, Análisis muestra 
con toda claridad el más sencillo de todos ellos: 
la burbuja. 


28 


Código 
,; . 
maqulna 
Como es sabido, la potencia e inteligencia de 
un programa depende, en gran medida, de su 
habilidad para la toma de decisiones. En código 
máquina, esto puede hacerse gracias a los 
Flags. 
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Si qUieres un ordenador de ((una pieza' piensa 
, , 

 en el AMSTRAO CPC 4M Tendras un 
ordenador de una vez por todas. Gracias a sus 
64K RAM Y 32K ROM ya sus casi ,hmltadas 
posibilidades de CJeCim'ento. t,enes garantrÚdo 
que el ordenador CPC 464 no se te quedará 
pequeño. 


COMPLETO 


Ademas. gracias a su momtor (color o fósforo 
verde) de alta resolución (hasta 640 x 200 plxels 
diretcionados indIVIdualmente) y a su unrdad de 
cassette ,ncorporadd di teclado, podrás dlSlruldr 
de tu AMSTRAO de una manera Independienle. 
presCindiendo del televisor y del radiocasselte 
de lu casa (a veces tdn so ICltados). 


¡Y QUE ME DICES DE LOS 
PROGRAMAS! 


Actualmente ya hay Cientos de ellos 
dispombles en España. S,n olvidar que son vanas 
las lev,stas dedicadas sólo a AMSTRAO y que el 
número de libros y penféricos del CPC 464 
crecen día a dla pOlenciando así la creativ,dad de 
tu ordenador personal 
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CARACTERISTICAS TECNICAS 


Mlcroprocesador 280 (4MHz). 
Memona de 64K RAM Y 32K ROI'1. 
- Gráficos de alta resoluCiÓn de hastd 640 por 
200 p,xels dlreccionables mdiv,dualmente. 
- Umdad de cassette mcolporada en el teclado, 
- Momtor color o fÓsforo verde mclUldo en el 
S,stema, 
- Texto en pantalla de 20.40 Y 80 columnas por 
25 líneds. 
- LOCOMOTlVE BASIC ampliado. 
Paleta de 27 colores y efectos de 4Iash», 
- Teclado profesional tipo QWER TY con 
bloque numenco y teclas para cursor 
independíentes. 
- Sahda Centronics paralelo. 
- Lector de discos de 3" (180K pOI cara) 
opcional (con CPIM y Or. LOCO inclUidos 
Junto a la unrdad de disco). 
- Manuales en cdstellano, 
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HOBBY PBESS,S.A. 


Apartado de Correos 


n." 54.062 (Apartados Altos) 
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Al comprar tu ordenador CPC 464, 
AMS rRAO ESPAÑA te obsequia con 8 cassettes 
de programas y el ilbro .cuía de Refelenc a 
BASIC para el plogramador. 
EXijé la GARANTIA AMSTRAD 
ESPAÑA UNICA VALIDA PARA 
ACCEDER AL SERVICIO TECNICO 
OFICIAL. 


PRECIO: 
66.900 ptas. 


(monitor fósfolo velde) 
95.900 ptas. 
(mon,torcolol) 
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Representante poro Argenltno, Ch,le, 
Uruguay y Paraguay, CIO. 
AmeriC<lno d,
 Ediciolte!:l, S.R.L. Sud 
Am."iw 1.532, Tel.: 21 2464, 1209 
8UENOS AIRES (Argenlllw}, 
M. 1'1. AMSTRAD no se hace 
I\t'ct''ioriontenlt' solidario dp los 
opiniones '1er
¡dos por sus 
colaboradores. en los articulas 
fir m(ldos. RE'servodos lodo'i los 
d(;'rechos. 
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Año J · Número 70.5 al 77 de Noviembre de 7985 
750 plas. (sobrelasa Canarias, 7 O plas.) 


5 Primera 
plana 
O'ktronics está desarrollando ampliaciones de 
memoria para el Amstrad CPC664. 


6 Primeros 
pasos 
Continuamos analizando los bucles del tipo 
FOR... NEXT. Su potencia y posibilidades 
aumentan mediante la técnica de anidamiento, 
profusamente estudiado en este número. 


Mr. Joystick '4 
El mogo Marac ha regresado del bosque y se 
enfrenta a los fuerzas del mal con ayudo de sus 
hechizos y la sabiduría adquirida tras largos 
años de solitaria meditación. 
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18 Banco 
de pruebas 
Amstrad ha lanzado al mercado un 
ordenador personal especialmente diseñado 
para el proceso de textos en español, sin perder 
por ello un ápice de su potencia como 
computador de «propósito general)). En 
esta primera tomo de contacto, banco de 
pruebas intenta dar una visión de coniunto de 
sus posibilidades. 
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Serie Oro 


Jugar a las cuatro en raya contra una 
máquina puede parecer aburrido, pero si el 
ordenador tiene muchos niveles de destreza y el 
toblera es una estructura tridimensional formada 
por cuatro tableros simples, la coso cambia, 


21 Análisis 


Los algoritmos de ordenación, de cadenas 
alfanuméricas y de números, constituyen un 
capítulo muy importante de la programación, 
porque tarde o temprano tendrán que ser 
utilizados en algún programa, Análisis muestra 
con toda claridad el más sencillo de todos ellos: 
la burbuia. 
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Código 
máquina 
Como es sabido, la potencia e inteligencia de 
un programo depende, en gran medido, de su 
habilidad para lo toma de decisiones. En código 
máquina, esto puede hacerse gracias a los 
Flags. 
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ZAFIRO SOFTWARE DIVISION 
Paseo de la Castellana, 141. 28046 Madrid. 
el. 459 30 04. Tel. Barna. 2093365. Telex: 22690 ZAFIR E 
'rogramas editados, fabricados y distribuidos en España con la garantía Zafiro. Todos los derechos res rvados. 



E RICSSON 
VUEL VE A CASA 


La multinacional sueca no vende- 
rá más ordenadores en Estados Uni- 
dos, debido lógicamente, a los ma- 
los resultados que sus productos es- 
tán teniendo en el extremadamente 
difícil y competitivo mercado ameri- 
cano. 
Los suecos habían hecho tratos con 
una empresa petrolífera norteame- 
ricana, la Atlantic Richfield, para 
vender sus máquinas. A través de 
ellos, han comunicado que los 175 
contratos con sus distribuidores no se 
renovarán a final de año. 
Ericsson ha decidido dedicarse ex- 
clusivamente al mercado europeo, 
algo más complaciente y menos com- 
petitivo. 


MICROSOFT 
EN IRLANDA 


La compañía norteamericana Mi- 
crosoft, creadora del sistema opera- 
tivo dellBM PC, el famoso PC DOS 
(MS DOS para los compatibles), ha 
decidido asentarse firmemente en 
Europa estableciendo una fábrica en 
Irlanda, la cual se espera que alcan- 
ce muy pronto la producción de 
500.000 programas anuales, en su 
mayor parte dirigidos al Apple y al 
IBM pc. 


¿COMO VAN 
LAS COSAS? 


En el sector informático, pese a in- 
formes alarmistas, las cosas parecen 
ir viento en popa. Según el Ministe- 
rio de Industria y Energía, la factu- 
ración total de las empresas informá- 
ticas creció un 30,5 por 100 en 1984. 
En España se facturó la astronómi- 
ca cifra de 49.324 millones de pese- 
tas, frente a los 37.806 de 1983. 
También aumenta rápidamente el 
ritmo de los ordenadores instalados 
en nuestro país, a un ritmo de apro- 
ximadamente un 8 por 100 anual. 
Así que ya sabe: ante los rumores 
de crisis en el ordenador, abrume a 
los augures con cifras «irrebatibles». 
Las estadísticas no mienten. 
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A MPLIACION DE MEMORIA PARA EL 664 


esde la apanclon del 
CPC6128, Amstrad ha recibido crí- 
ticas muy duras debido a lo que mu- 
chas personas han interpretado co- 
mo una deliberada indiferencia ha- 
cia sus clientes, una vez que han ad- 
quirido sus máquinas. 
Me refiero a que los felices com- 
pradores de uno CPC664, poco, muy 
poco tiempo después, se han encon- 
trado con la aparición en el merca- 
do de un nuevo modelo de superio- 
res prestaciones que el suyo y enci- 
ma al mismo precio. 
Alan Sugar, chairman de la com- 
pañía británica, !alió del paso como 
pudo explicando que el advenimien- 
to del CPC6128 se debía a «inevita- 
bles exigencias \'ecnológicas», y no 
cabe duda de que le asiste cierta o 
toda la razón. Los ordenadores de 


64 K se están quedando pequeños a 
pasos agigantados. 
Las declaraciones de Sugar puede 
que mitigaran el escozor de la heri- 
da de los dueños de un 664, pero 
aparentemente no resolvían mucho. 
No obstante, a instancias de Ams- 
trad y de Indescomp, sus distribuido- 
res en España, la compañía inglesa 
D'ktronics, conocida, entre otras co- 
sas, por su teclado profesional para 
el ZX-Spectrum, tiene en un estado 
de desarrollo muy avanzado amplia- 
ciones de memoria para el CPC664. 
Las nuevas ampliaciones permiti- 
rán igualar en prestaciones al 664 
con el 6128, e incluso superarle en 
lo que a memoria RAM se refiere. 
El 664 podrá tener un total de 128 
K o de 256 K de memoria. Buenas 
noticias para los usuarios del 664, a 
la espera, naturalmente, de los pre- 
cios a los que se venderán estas am- 
pliaciones. 
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: UCLES 



 N/DADOS 


Raro es el programa que no hace uso de la iteración, o 
repetición de una serie de sentencias un número determinado 
de veces, como una sencilla y potente técnica de 
programación. Para eso están los bucles, pero, ¿pueden 
anidarse?, ¿pueden usarse para representaciones gráficas? 


a última vez analizamos el uso de 
los bucles FOR... NEXT para repetir un cuer- 
po de instrucciones por un número fijo de ve- 
ces. Vimos que podemos usar las mismas líneas 
de programa una y otra vez intercambiándo- 
las entre un FOR y un NEXT. 


Programa uno 


Esto no sólo aumenta la potencia de un pro- 
grama sino que ambién ahorra mucho. El pro- 
grama I no debe presentarnos ninguna difi- 
cultad. 
Es una utilización muy elemental del bucle 
FOR... NEXT formado por las líneas 20 y 40. 
El cuerpo es la línea 30. Imprime un asterisco 
en la pantalla cada vez que el bucle realiza 
un ciclo. 
El punto y coma que está al final de la línea 
asegura que los asteriscos se «peguen» juntos, 
uno tras otro. 
El número de veces que el bucle hace el ci- 
clo está determinado por la variable de con- 
trol «línea». Empieza con un valor de 1 y se 
incremento en 1 cada vez que el programa lle- 
ga al NEXT. 
Cuando el valor de «línea» finalmente lle- 
ga a 11 el bucle finaliza, habiendo hecho el 
ciclo 10 veces. El resultado es una línea de 10 
asteriscos extendida a través de la pantalla. 
Pero dejemos el programa sin hacerle co- 
rrer. Probemos, cambiando la variable de con- 
trol «línea», a producir líneas de 20 ó 30 as- 
teriscos. Preste atención a esto: 
FOR línea= 10 TO 19 


o 


FOR línea=99 TO 90 STEP-1 
producen también 10 asteriscos. No siempre 
tiene que ser 1 el valor inicial de la variable 
de control del bucle. 
la razón principal es que cada instrucción 
entre el FOR y el NEXT se repite. No importa 
si es un comando PRINT o un lET o cualquier 
otro. Mientras el bucle aún está funcionando, 
todo lo interior a los límites de FOR... NEXT 
se realiza repetidas veces. 
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Programa dos 


Esto también ocurrirá cuando haya otro bu- 
cle FOR... NEXT que envuelva el cuerpo del 
primer bucle. El programa I1 demuestra lo que 
queremos decir. 
las líneas 30 a 50 no deben tener misterios, 
son las mismas que las del FOR... NEXT del 
programa anterior. Como vimos antes este bu- 
cle concretamente hará el ciclo 10 veces y pro- 
ducirá una línea de 10 asteriscos. Sin embar- 
go, con el programa 11 conseguiremos 5 líneas 
de 10 asteriscos cada una. ¿Cómo ocurre? 
la respuesta está en el FOR... NEXT forma- 
do por las líneas 20 y 70. Mirando la línea 20 
podemos ver que este bucle hará el ciclo 5 ve- 
ces mientras que la variable de control «nue. 
va línea» toma valores de 1 a 5. 
No se preocupe nunca de las líneas inter- 
medias. Por el momento concéntrese sólo en 
que el bucle exterior hace ciclos 5 veces. 
Ahora, como vimos antes, todo lo interior 
al FOR... NEXT se repite cuantas veces el bu- 
cle hace el ciclo. Así que su cuerpo -que es 
todo lo que hay entre el FOR de la línea 20 
y el NEXT de la línea 70- se repetirá 5 ve- 
ces. 
Sin embargo, en vez de ser solamente un co- 
mando PRINT como en el programa anterior, 
el cuerpo del bucle es ahora otro FOR... NEXT. 
Y,como vemos, necesita hacer el ciclo 10 ve- 
ces. Esto es, en realidad, lo que ocurre. 
Cada vez que el bucle exterior, controlado 
por «nuevalínea», se repite una vez, el bu- 
cle interior se ejecuta en él completamente. Es 
decir, por cada ciclo del bucle exterior, el bu- 
cle interior, controlado por «línea», se repite 
1 O veces produciendo la conocida línea de as- 
teriscos. 
Como el exterior hace ciclos 5 veces en to- 
tal, y el interior repite el ciclo 10 veces cada 
vez que se recorre el otro, hemos conseguido 
5 filas de 10 asteriscos. 
Esto es un ejemplo de lo que conocemos co- 
mo bucle anidado. En este caso es un 
FOR... N EXT (líneas 30-50) anidado en el in- 
terior de otro (líneas 20-70). Cada vez que el 
bucle exterior hace un nuevo ciclo, el bucle in- 
terior repite su ciclo hasta que completa su nú- 
mero total de repeticiones. 
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De nuevo, no nos contentamos con el pro- 
grama ejemplo, vamos a probar a variado. 
¿Qué nos gustaría que estas líneas: 
20 FOR nuevalínea = lOTO 15 
30 FOR línea= 10 TO 5 STEP-l 


o éstas 
20 FOR nuevalínea = lOTO 50 STEP 5 
30 FOR línea= 15 TO 21 STEP 2 
produieran? El número de asteriscos en cada 
línea y el número de líneas, ¿se corresponden 
con sus previsiones? 
Atención al cuidado que ha de tener con las 
variables de control para evitar realizar más 
ciclos de cada bucle que los que realmente de- 
sea. 
A propósito, ¿puede ver la utilidad de 
la línea 60? Es aquí donde se deshace el 
efecto del punto y coma del final de la línea 
40 cuando el programa sale del bucle interior. 
lo que produce es lo que conocemos como re- 
torno de carro. Intentemos omitirlo y ver qué 
sucede. 


Pro.grama tres 
Armados con nuestro hallazgo del bucle ani- 
dado podemos volver al programa 111 del ar- 
tículo anterior (programa /11 de este número) 
y ver cómo trabaja. 
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Como podemos ver, consiste en dos bucles, 
uno anidado en el interior del otro. El interior 
está formado por las líneas 50 a 70 y tiene la 
variable de control <<interior». Esta toma va- 
lores de 1 a 3, y cada vez que el «bucle in- 
terior» hace un ciclo aparece un mensaje. 
El bucle exterior está formado por las líneas 
30 y 80 y, como colmo de originalidad, tiene 
la variable de control «exterior». Esta, tam- 
bién, tiene un rango de 1 a 3. Sin embargo, 
cada vez que el exterior haga un ciclo no só- 
lo escribe un mensaje, sino que también se rea- 
lizan los tres ciclos del interior. 
En el momento en que el bucle exterior ha 
completado el número total de repeticiones, 
el bucle interior habrá hecho su cantidad to- 
tal 3 veces. Sigamos la trayectoria del progra- 
ma. Las líneas 10 y 20 son precisamente los 
REMs, que el Amstrad ignora. La línea 30 
cuenta al micro que está comenzando un bu- 
cle y que la variable «exterior» se utiliza- 
rá como control de bucle. Inicialmente tiene 
un valor de l. 
El programa va entonces a la línea 40, y sa- 
ca el mensaje: 
Este es el bucle exterior 1 
La línea 50 señala el comienzo de otro bu- 
cle FOR... NEXT. Este bucle tiene la variable 
de control «interior» tomando valores de 1 a 
3. En esta etapa el Amstrad da a <<int
- 
rior» el valor 1 y va a la línea 60. Esto se 
transforma en el mensaje: 


.J 


Este es el bucle interior 1 
y el programa va al NEXT de la Imea 70. Aquí 
«interion) se incremento en 1 y el programa 
vuelve al FOR de la línea 50. Puesto que «in- 
terion) está dentro de los límites señalados, el 
control va a lo línea 60 y el mensaje: 
Este es el bucle interior 2 
aparece en pantalla. 
Otra vez se encuentra con el N EXT de la lí- 
nea 70, «interíon) se aumenta a 3 y el pro- 
grama regresa a la línea 50. La línea 60 se 
escribe ahora: 
Este es el bucle interior 3 
y el programa da con el N EXT de la línea 70 
otro vez. Ahora, sin embargo, cuando «inte- 
rior» aumenta a 4 se exceden las condiciones 
del bucle. El programo sale y alcanza la línea 
80. Aquí encuentra el NEXT del bucle exterior. 
Entonces «exterior» se aumenta o 2 y el 
programa vuelve a la línea 30. La línea 40 se 
escribe: 
Este es el bucle exterior 2 
y la línea 50 de
uelve el programa ?I bU,cle 
interior, produCiendo los tres mensales «In. 
terion) como antes. 
Uno vez que esto está hecho el programa 
sale del bucle interior y se encuentra otra vez 
el NEXT de la línea 80, «exterior» llega a 
ser 3 ahora y el programa regresa a la línea 
30 por última vez. Cuando «exterior» es 4 
el programa termina. 
No se preocupe si no lo comprende en to- 
da su extensión. Los bucles anidados necesi- 
tan ser trabajados un poco, pero una vez que 
se haya ejercitado con ellos, pasarán a ser un 
asunto trivial. 
Todo lo que tiene que comprender es que 
por cada ciclo sencillo del bucle exterior el bu- 
cle interior hace todos sus ciclos. Añadiendo 
una línea parecida a: 
55 PRINT «exterion) = exterior 
«interion)-i nterior 
se aclararían las cosas. 


Programa cuatro 


Mientras hemos estado con el programa 11I 
debimos señalar que no necesita colocar va- 
riables de control después de N EXT. El pro- 
grama IV lo demuestra. 
No obstante, mientras el Amstrad puede 
ser bastante hábil al mantenerse al tanto de 
cosas, nosotros podríamos no serio. Siga nues- 
tros consejos, y coloque siempre la variable, 
al menos hasta que haya conseguido que su 
programo funcione correctamente. 
Observemos que el programa IV es una va- 
riante del programa 111. Sólo ha tenido dos al- 
teraciones sin importancia en una parte de las 
líneas, pero vea la diferencia de resultados. 
Como podemos apreciar, anidando bucles 



rimeros 
p' OS 


FOR... NEXT uno dentro del otro, ambos se 
hacen más flexibles y poderosos. 
Hasta aquí sólo hemos anidado un bucle 
FOR... NEXT dentro de otro. Es perfectamente 
posible tener 3 o más bucles anidados. Más 
bien se parecen a esas muñecas rusas o «ma- 
trioskas» que aparecen en la portada de las 
historias de espías. Funcionan de un modo muy 
semejante pero se les comprende más fácil- 
mente en la práctica que en la teoría. Añada- 
mos: 


45 FOR intermedio = 1 TO 3 
47 PRINT TAB(5) «Este es el bucle 
intermedio» 
intermedio 
75 NEXT intermedio 
al programa 111 y veamos lo que queremos de- 
cir. Y observe qué enorme incremento en los 
resultados a causa sólo de 3 líneas extras. Co- 
mo dijimos, estos bucles anidadoS'son muy po- 
tentes. 


Programa cinco 


Una cosa, debemos ser cuidadosos cuando 
estemos ocupados con los bucles anidados, pa- 
ra colocar los NEXT en el orden correcto. El 
programa V lo demuestra muy bien. 
Cuando lo hagamos correr obtendremos el 
mensaje de error: 
Unexpected NEXT in 70 (NEXT inesperado...) 
No nos llevará mucho tiempo descubrir que 
hemos confundido al computador al encontrar 
que las variables del control en las líneas 60 
y 70 están intercambiadas erróneamente. Ten- 
dría que ser: 


60 NEXT interior 
70 N EXT exterior 
Si realmente desea que probemos sus cono- 
cimientos sobre los bucles anidados nos pue- 
den aclarar, ¿por qué cambiando las últimas 
líneas a: 


60 N EXT exterior 
70 N EXT exterior 


produciría el mensaje: 
Este es el bucle exterior 1 R 
Este es el bucle exterior 1 
ontes que el mensaje de error? 
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Programa seis 
Pero basta ya de decir que podemos equi- 
vocarnos, esto es demasiado teórico. Después 
de todo, nosotros no podemos cometer erro- 
res, ¿verdad? Vamos a estar demasiado 
ocupados haciendo cosas importantes, tales 
como producir triángulos de asteriscos. Vea- 
mos el programa VI. 
Aunque el resultado no nos entusiasme, el 
programa contiene algunos puntos interesan- 
tes. Por ahora somos capaces de reconocer los 
juegos de bucles anidados y el CHR$(13) no 
nos asusta. 
El bucle exterior, con la variable de control 
«longitud» variando de 1 a la, es bastan- 
te sencillo. El bucle interior es algo diferente. 
Aquí la variable de control «línea» va des- 
de 1 hasta «longitud». Ahora «longitud» 
cambia en cada vuelta del bucle exterior. 
En la primera vuelta «longitud» es l. Por 
tanto, la variable de control del bucle interior 
va de 1 a l. El primer resultado es un asteris- 
co solitario. 
En la siguiente vuelta del exterior, (dongi- 
tud» es 2, así que ahora cuando el progra- 
ma realice el bucle interior, «línea» va des, 
de 1 a 2. Aparecen un par de asteriscos. 
la tercera vez que se hace el exterior, «lon- 
gitud» es 3, de modo que el interior saca un 
trío de asteriscos puesto que «línea» va de 
1 a 3. En el momento en que «longitud» es 
la, aparecen la asteriscos. 
la finalidad es comprender que el número 
de repeticiones del bucle interior depende de 
la variable de control del bucle exterior. Los 
bucles no sólo están anidados, el ex- 
terior controla al interior. 


Programa siete 
¿Podemos alterar el programa pa- 
ra que realice el mismo triángulo pero al re- 
vés? El programa VII nos lo demuestra. 
Aquí la «longitud» de decrementa cada 
vez que se hace el bucle exterior, por lo tan- 
to, se reduce el número de asteriscos en cada 
línea. 
Una vez seguros de haber comprendido 105 
dos últimos programas tenemos que conseguir 
sacar «la imagen sobre el espejo» de 
los asteriscos del programa VI. 


PROGRAMAS 


JO REM PROGRAMA I 
20 FOR linea J 10 10 
30 F'RINT "*"; 
40 NEXT 11 nea 


lO REM PROGRAMA II 
20 FOR nueva]lnea-l 10 5 
3(1 FOR llnea-l 10 11) 
40 PRJNT "*", 
50 NEXT l1nea 
6(' PR I NT CHR$ ( t:!.) 
71:' NEXT nuevallnea 


10 REM F'ROGRAMA I I I 
20 REM ANTl GUO F'ROGRAMA XII I 
3(1 FOR exterIor=!. 10 3 
4(' F'RINT "Este es el bucle exterIor 
" exter i or 
50 FOR interIor I TO 3 
60 PRINT TAB(IO)"Este es el bucle i 
nterlor" Interior 
70 NEXT InterIor 
80 NEXT exterior 


10 REM PROGRAMA IV 
20 FOR exterior-I. TO 5 
30 PRINT"Este es el bL1cle exterior ll 
exterior 
40 FOR interior 1 TO 4 
50 PRINT TAB(10) "Este es el bucle 
InterIor" interior 
60 NEXT 
70 NEXT 


lO REM PROGRAMA V 
20 FOR exterl0r
1 TO 3 
30 PRINT "Este es el bLlc]e exterIor 
.. exterIor 
40 FOR interior 1 TO 3 
50 PRINT TAB(IOI"E&te es el bucle 1 
nterior"interl0r 
60 NEXT exterIor 
70 NEXT interIor 


lO REM F'ROGRAMA VI 
20 FOR longitud I TO lO 
30 FOR llnea
1 TO longitud 
40 PRINT "*"; 
50 NEXT linea 
60 PRINT CHR$(13) 
70 NEXT longitL,d 


lO REM PROGRAMA VII 
20 FOR longItud-lO TO 1 STEP -1 
30 FOR line,,
1 TO longItud 
4(' PRINT .....; 
50 NEXT llne" 
60 PRINT CHR$(13) 
70 NEXT longitud 


10 REM F'ROGRAMA VI I I 
20 CLS 
30 FOR 11ne,,
1 TO 10 
40 FOR longItud I TO line" 
50 LOCATE ll-longltL<d.linea 
60 PRINT "*.. 
70 NEXT longitud 
80 NEXT line" 


10 REM PROGRAMA IX 
20 CLS 
30 asterisco$ "*" 
40 FOR line"
l TO 10 
50 LOCATE 11-linea.llne" 
60 PRINT "sterisco$ 
70 asterIsco$ asterlsco$+"*" 
80 NEXT 11ne" 
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Programa ocho 


No es tan sencillo como el programa ante- 
rior, pero si recordamos cómo trabaja lOCA- 
TE no tendremos ningún problema en saber 
cómo funcionaría. El programa VIII es una 
muestra. 
y ahora, ¿podemos volverle al re- 
vés? los cambios son: 


30 FOR línea = lOTO STEP -1 
50 lOCATE ll-Iongitud, ll-Iínea 
y esto es todo en esta ocasión. le dejamos 
que se entretenga con 105 bucles anidados, 
continúe probando hacer formas con asteris- 
coso 


Aunque esto no sea el uso más importante 
de su Amstrad, le asombrará cómo aumen- 
tará su conocimiento de 105 bucles anidados 
y de 105 posibles usos de esta técnica en sus 
propias aplicaciones. 
y cuando se canse de ellos, ¿puede com- 
prender lo que ocurre en el progra- 
ma IX? 
Produce el mismo resultado que el progra- 
ma VIII, pero tiene un 5010 bucle en lugar de 
dos. ¿Qué ocurre? la respuesta está en las 
variables literales. 
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Te presentamos un eqUipO sensaCional: el 
AMSTRAD CPC 6118. 


TRABAJA CON EL 6/18 


El CPC 6/18 incluye en su 
suministro: 


Con un sólo cable para enchufar a la red el 
Sistema 6 128 está listo para funcionar. 


Haz un sitio en tu negocIo a¡6128. Planifica 
presupuestos. lleva contabilidades. gestiona 
archivos, todo fáCilmente graCias a su Sistema 
Operativo CPIM (en versiones 2.2 y Plus). que 
(como ya sabes) te permitirá acceder a la más 
extensa biblioteca de programas profesionales: 
bases de datos, procesadores de textos. hOjas de 
cálculo, ete. 


Para jugar. el 6128 es un ordenador muy 
serio; graCias a sus cientos de programas 
dispombles. tienes aseguradas horas de 
entretenirmento. Yen el mundo de la enseñanza 
no es menos. 


CARA CTER/S T/CA S 
TECN/CAS 


- Disco con Sistema Operativo CPIM 2.2 
y lenguaje Dr. LOGO 
- Osco con Sistema Operativo CPIM Plus 
y utilidades. 
- Disco con seis programas de obsequio. 
- Manuales en castellano. 
GARANTIA AMSTRAD ESPAÑA 
UNICA VALIDA PARA ACCEDER AL 
SERVICIO TECNICO OFICIAL. 


JUEGA y APRENDE 
CON EL 6/18 


GraCias a sus sensaCionales capaCidades 
gráficas (paleta de 27 colores y hasta 640 x 200 
PIXELS) y sonoras (3 voces y 8 octavas. altavoz 
mtenor y salida stéreo) el 6 128 es una 
herramienta imgualable. Además. dentro del 
paquete de programas que se entrega con el 
s,stema, está mcluido el lenguaje educatIVo por 
excelencia: el Dr. LOGO de Dlf]ltal Research. Y 
para profundizar en ellengua¡e de la l(¡formát,ca 
recuerda que el 6128 es el ordenador Idóneo, ya 
que posee uno de los más rápidos y potentes 
BASIC -el LOCOMOTIVE BASIC-. así 
como otros muchoslengua¡es de programaCión: 
FORTH, PASCAL, ete. 


- 128K RAM Y 48K ROM (mcluye 
Locomotive BASIC y Sistema 
Operativo). 
- Momtor:Colorde 14"yfósforo 
verde de 12'
 
- Unidad de Disco]" incorporada 
( l 80K por cara). 
- Teclado profesional. 
- Sistema Operativo: AMS-D05. 
CPIM 2.2 y CPIM Plus. 
- Salida para segunda umdad de 
disco y cassette externa, 


TODO POR: 
109.500 ptas. 
(momtor fósforo verde) 
134.500 ptas. 
(momtor color) 


,; 11t1/III!.
 I! 
-- 


ESP,AJ\JA 
GARANTIA INDESCOMPJ1[u]
TIillill[. 
Avd, del Mediterráneo, 9 - 28007 Madrid Tels. 43345 48 - 433 48 76 - Telex 47660 FAX - 4332450 



AMPLIACION 
DEL BASIC: RSX 


Los usuarios del CPC464 se han encontrado con que Amstrad 
en modelos posteriores, ha añadido nuevos comandos al ' 
Basic, me , 'o
á
dolo bastant
. Surge, por tanto, en estas 
personas e loglco deseo de disfrutar, ellos también, de los 
nuevos comandos. Esto resulta muy sencillo utilizando como 
herramienta las Extens
ones Residentes del Sistema, en inglés 
RSX (Resldent System Extension). 
£,;, Amstrad del CPC464 
es bastante peculiar. En algunas 
áreas de la programación tiene unas 
prestaciones francamente excepcio- 
nales (como su habilidad de mane- 
iar las interrupciones, permitiendo si- 
mular multitarea), mientras que otras 
falla notablemente, como en el caso 
de los gráficos. 
A nivel del firmware, del sistema 
operativo del ordenador, el panora- 
ma es mucho más promisorio: exis- 
ten multitud de rutinas aprovecha- 
bles para crear nuevos comandos 
Basic que se encuentran plenamen- 
te documentadas en el manual de 
Firmware. 


La respuesta está en el 
firmware 


Estos comandos adicionales se es- 
criben como subrutinas en código 
máquina, las cuales pueden estar si- 
tuadas en cualquier zona de la me- 
moria RAM y tener la longitud que 
queramos. 
Los nombres y las direcciones de 
ejecución de las rutinas se almacenan 
en una tabla, acerca de la cual el sis- 
tema operativo debe ser informado, 
de modo que pueda utilizarla para 
reconocer los nuevos coma ndos 
cuando se ejecute un programa Ba- 
sic que haga uso de ellos. 
Como comentábamos anterior- 
mente, estos comandos se denomi- 
nan RSX y deben ir precedidos del 
signo «1» para que el sistema sepa a 
qué atenerse. 
El programa 1 añade 7 nuevos co- 
mandos al Basic del CPC464. Su sin- 
taxis y función serán descritas más 
tarde¡ primero analizaremos cómo 
están construidos y cómo funcionan. 
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¿Cómo se crea un 
nuevo comando Baslc? 


Todos los dialectos de Basic tienen 
un método para llamar a una subru- 
tina escrita en código máquina. En el 
Amstrad toma la forma del coman- 
do 
ALL, el cual puede ir seguido, 
opcional mente, de una serie de pa- 
rámetros, además de la dirección de 
comienzo de la subrutina en máqui- 
na. La existencia de estos parámetros 
dotan de gran potencia al comando 
CALL, ya que pueden ser usados por 
la rutina en máquina y, además, és- 
ta puede también devolver resulta- 
dos de su acción y atesorarlos en va- 
riables Basic, estipuladas por nos- 
otros. 
Los parámetros se colocan detrás 
de la dirección de llamada, separa- 
dos por comas: . 
CALL dirección, parámetro 1, pará- 
metro 2, oo, 
y, cuando Basic ejecuta CALL, el blo- 
queo entero de parámetros se ubica 
en una zona, la que sea, en memo- 
ria RAM. 
La dirección concreta de esta zo- 
na no nos interesa, ya que, previso- 
ramente, el sistema operativo colo- 
ca en el registro A (acumulador), el 
número de parámetros pasados a la 
rutina desde el comando CALL, y, lo 
más importante, el registro IX apun- 
tando al comienzo de la zona de me- 
moria donde están almacenados los 
valores. Si meditamos en esto un po- 
co, concluiremos en que manipular 
todo esto es un juego de niños. 
Los parámetros pueden obtenerse 
utilizando direccionamiento indexa- 
do con el registro IX. Por ejemplo: 


LD B, (IX+O) 


a 
::. 

 
-; 


cargará el registro B con el primer 
ítem del bloque de parámetros (sólo 
el byte baio). 
Estos pueden ser expresiones en- 
teras, reales o la dirección de una 
variable. Un número de dos bytes se 
coloca en el bloque por cada pará- 
metro asignado al CALL. 
Un número entero, variable o ex- 
presión, se pasa al bloque de pará- 
metros directamente¡ un número 
real, variable o expresión, primero 
se convierte a un valor entero, y lue- 
go se pasa. 
Colocando el signo «@» antes de 
una variable, la dirección donde se 
encuentra el valor de dicha variable 
(no el valor, insisto), se coloca en el 
bloque de parámetros. 


Unos cuantos eiemplos 


De esta forma podemos poner en 
esa variable el valor que sea resul- 
ta
o de la acción de la rutina en má- 
qUina. 



Por ejemplo: 


a% = 1 O 
CALL &8000, @a% 


pondría en el bloque de parámetros 
la dirección de la variable a%, y la 
siguiente secuencia de instrucciones 
en lenguaje máquina, carga en el 
acumulador el valor numérico de di- 
cha variable: 


1 
" 


LO L, (IX+O) 
LO H, (IX+ 1) 
LO A, (HL) 


Al final de estas instrucciones, el 
acumulador contendrá 10. Suponga- 
mos que a continuación se ejecutan 
otras instruccione, las que sean, que 
transforman el valor del acumulador 
a 5. Para colocar este número en la 
variable a%, habría que hacer lo si- 
guiente: 


LO L, (lX+O) 
LO H, (IX+ 7) 
LO (HL), A 


F L 
 ,
{ _""" 
 ,'/ 
"J
 A,


>\ 

" / 
 
',\", -"
 ) ,)J .{::." -" >- ' 
. "'" 


; 
'1'
 
r-:ffi 7/ 
\ )\f i "...1 



 
 t 


'\ 


"1 ,1 
, '. 


admitiendo que el registro IX no ha 
sido alterado por la acción de la ru- 
tina y que la instrucción de vuelta al 
Basic RET ha sido incluida en un lu- 
gar apropiado, por ejemplo al final 
de la serie de órdenes antedichas. 
Todas las cadenas alfanuméricas 
deben ser pasadas precisamente de 
esta forma, a través del operador 
«@». Oe todas formas, en el caso de 
cadenas de caracteres el tema es al- 
go más complejo, porque lo que 
aparece en el bloque de parámetros 
es un «descriptor de cadena» que 
consta de tres bytes: el primero indi- 
ca la longitud de la cadena, y los 
otros dos la dirección verdadera 
donde se encuentran ubicados los 
caracteres. Para hacer lo que antes 
se mostró con la variable 0%, habría 
que trabajárselo un poquito más, co- 
mo por ejemplo: 
LO B, (IX+O): Longitud de la cade- 
na al registro b. 
LOL,(IX+2) 
LO H, (IX+3): HL apunta al primer 
caracter de la cadena. 


. 


...t..! r a 


. 
Acclon 


1 
I 
i 


LO A, (HL): El acumulador contiene 
el primer caracter de la cadena. 
La operación inversa se la dejamos 
a nuestros lectores. 


A la inversa también 
funciona 


Por alguna razón desconocida, 
Basic coloca los valores en el bloque 
de parámetros en orden inverso, es 
decir: 
CALL &8000,a,b,c,d 
al ejecutarse, dejará el registro IX 
apuntando al parámetro d: 


IX apunta ad 2 bytes 
IX + 2 apunta ac 2 bytes 
IX + 4 apunta ab 2 byles 
IX + 6 apunla 00 2 byles 


(bajo/alto) 
(bajo/alto) 
(bajo/alto) 
(bajo/alto) 


T 0101: 8 byles ocupados por el bloque de 
parómelros (de O a 71 
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Obsérvese que las secuencias de 
órdenes dadas anteriormente para 
la variable a% y la cadena de carac- 
teres sólo son válidas si hay un único 
parámetro después del .c
mando 
CALL o bien se trata del ultimo pa- 
rámetro. No obstante, conociendo el 
método que acabamos de explicar, 
adaptarlo adecuadamente no cons- 
tituye mayor problema. 


La ventaia de los 
comandos 
significativos 


Una orden como CALL &AOOO, no 
tiene mucho sentido que digamos. 
Obviamente, sería mucho mejor que, 
si la rutina &AOOO borra la pantalla, 
por ejemplo, pudiéramos escribir 
simplemente en el ordenador «bo- 
rra-pantalla», y se ejecutará, 
Esta es exactamente la facilidad 
que un RSX proporciona, llamando 
a una rutina en máquina por nom- 
bre, como un comando Basic más. 
Para poder hacer esto, debemos 
crear una «tabla externa de co- 
mandos», haciéndole saber al sis- 
tema operativo como se llaman las 
rutinas y dónde están situadas. Esta 
dividida en otras dos, que no nece- 
sariamente deben residir cerca una 
de otra en memoria. 
La primera mitad es una tabla de 
salto a las direcciones de ejecución 
a las rutinas, la segunda mitad con- 
tiene los nombres de las mismas. 


TABLA N. O UNO 


.tabla-rsx 
DEFW tabla- 
nombres 


; puntero a la lista de 
; nombres 
; tabla de salto 


J P reset 
J P set-dock 
JP gpen 


. tabla-nombres 
DEF$ 'RESE' 
DEFB &D4 


; a la última letra (T), 
; se le ha sumado 
i &80, resultando el 
; nuevo número en 
; &D4 


DEF$ 'SETClO' 
DEFB &CB 


DEFB O 
.esp-trabajo 
DEFS 4 
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Atención a la tabla número 1. Los 
dos primeros bytes contienen la di- 
rección de la lista de nombres, y al 
código ASCII de la última letra de ca- 
da nombre se le ha sumado &80 pa- 
ra que el sistema sepa dónde acaba. 
El final de la lista de nombres se se- 
ñala con un O. A continuación se de- 
jan 4 bytes como espacio de trabajo 
requeridos por el sistema operativo. 
Para indicarle a éste la presencia 
de RSX, el registro BC debe cargar- 
se con la dirección de la tabla, H L 
con la dirección donde comienzan 
los 4 bytes del espacio de trabajo 
y..., sólo queda llamar a una provi- 
dencial rutina del firmware, llamada: 


KL-LOG-EXT 
que comienza en la dirección &BC01 
y se encuentra completamente expli- 
cada en el manual del firmware. 


El programa 1 


Los 9 primeros bytes del código 
máquina del programa 1 se mues- 
tran en la tabla número 2, y realizan 
la función que acabamos de comen- 
tar. Por tanto, después de ejecutado 
el programa 1, CALL &8000 activa 
la tabla RSX y los nuevos comandos 
(el resto del programa 7). 
Cuidado con esto porque las ta- 
blas RSX están ligadas y puede ha- 
ber más de un activa a un tiempo, y 
si habilitamos la misma dos veces, el 
sistema operativo se volverá comple- 
tamente loco. 
En efecto, «ambas» están ligadas, 
pero ocupan el mismo espacio en la 
memoria. Resultado: system crash. 
Explicar completamente paso a 
paso el código máquina del progra- 
ma 1, sería terriblemente largo, pe- 
ro sí podemos analizar como está 
construido el más simple de todos los 
nuevos comandos, IGPAPER, que 
puede usarse para definir el color de 
la pantalla gráfica (Tabla número 3). 


TABLA N. O Dos 


lD BC, tabla-rsx ; código ensamblado 
; en &8000 
lD Hl, esp-trabajo 
JP &BCD1 ; dile al sistema que 
; hay en activo 
; una RSX y RETorna 
; al Bosic 


Paso a paso 


Es muy simple: hemos decidido que 
esta orden sólo puede tener un pa- 
rámetro, el color. Por tanto, lo pri- 
mero que hace la rutina es OECre- 
mentar el acumulador, aprovechan- 
do la circunstancia de que en él se al- 
macena el número de parámetros 
que siguen a IGPAPER. Si, después 
de OECrementar, el valor del acumu- 
lador no es cero, saltamos a una ru- 
tina de manejo de errores (JP NZ, 
error) porque hemos dado más de 
un parámetro. 


TABLA N. O TRES 


.gpaper 


i asignar color de 
; papel para gráficos 
; ¿un solo paráme- 
; Ira? 
; si hay más de 
i uno, salta a la 
rutina 
; de; manejo de 
; errores 
; obten color 
; llamada a la rutina 
; firmware GRA-SET- 
; PAPER 
; pon el color y 
; R ET orna a Basic 


DEC A 


J P NZ, error 


lD A, (IX+O) 
JP &BBE4 


Si, por el contrario, el acumulador 
contiene cero, J P NZ no se ejecuta- 
rá, y saltamos a la dirección del firm- 
ware &BBE4 (JP &88£4) que coloca- 
rá el color adecuadamente después 
de haber introducido el valor en el 
acumulador [LO A, (IX+O)]. 
y ya está. Así de fácil. 


" Í' 


0:' 
l. 


.... 


v 



programa numero 


PROGRAMAS 


10 REM PROGRAMA 1 
20 REM By R.A.Waddilove 
30 REMlclAmstrad Semanal 
40 sum=0:address=&8000 
50 FOR i=1 TO 36 
60 READ code$ 
70 FOR j=1 TO 25 STEP 2 
80 byte=VAL ("
("+MID$ (code$. j. 211 
90 POKE address,byte " 
100 sum=sum+byte:address=address+l 
110 NEXT 
120 NEXT 
130 IF sum<>50246 THEN PRINT"Error" 
140 END 
150 DATA 010980218580C3D1BC2F80C3E6 
160 DATA 80C3A180C3C680C3DC80C30381 
170 DATA C31581C3268100000000000000 
180 DATA 000000000000000052455345D4 
190 DATA 534554434C4F43CB475045CE47 
200 DATA 50415045D24745D4464C5553C8 
210 DATA 46494CCCOOOOOOOOOOOOOOOOOO 
220 DATA 00000000000000000000000000 
230 DATA 00000000000000000000000000 
240 DATA 00000000000000000000000000 
250 DATA 000000000000002195807ECD5A 
260 DATA BB23A720F8C952535820657272 
270 DATA 6F720DOA00210000110000A7CA 
280 DATA 10BD3D2009DD6EOODD6601C310 
290 DATA BDDD5EOODD5601DD6E02DD6603 
300 DATA C310BDFE02C28980DD7EOOCDDE 
310 DATA BB3E17CD5AB8DD7E02C35ABB3D 
320 DATA C28980DD7EOOC3E4BBCD06B9F5 
330 DATA CD37BDCDOOBBCDFFBBCD65BCCD 
340 DATA A7BCCD5ABBCD4EBBF1C30CB93D 
350 DATA C28980CD06BBDD6EOODD660177 
360 DATA 233600C93DC28980DD7EOOA7C2 
370 DATA A7BCCD09BB38FBC9FE03C28980 
380 DATA DD7EOOCDDEBBDD6E02DD6603DD 
390 DATA 5E04DD5605D5ED53C78122C981 
400 DATA CDFOBB32CB813CCDE4BBCD11BC 
410 DATA 3E0438063E0228023E0132CC81 
420 DATA CD9581ED42CD788128F6D1ED53 
430 DATA C781CD958109CD788128F7C922 


1 


Todos los nuevos comandos se ex- 
plican en la Tabla 4, y el programa 
2 muestra una pequeña aplicación 
de algunos de ellos. 
En el programa 1 se pueden ob- 
servar una serie de bloques de ceros, 
espacio reservado para que cada 
uno añada sus propias rutinas , nom- 
bres y saltos. 
Para hacer esto, situar un J P al co- 
mienzo de su propia rutina en la di- 
rección &8020 , y poner el nombre 
(mayúsculas , con el código ASCII de 
la última letra + &80) en &8052. 
El nuevo código máquina puede si- 
tuarse donde sea , a partir de &81 CD 
hacia abajo. 
¿Alguién podría crear ICIRCUlO, 
x,y,r (coordenadas del centro y 
radio)? 
Hay sitio para 5 comandos más. 



 


440 DATA C781EB2AC981CDFOBB21CB81BE 
450 DATA C9ED5BC781E5CDFOBB21CB81BE 
460 DATA E1C92AC9812323CD878128F92B 
470 'DATA 2BE52AC9812B2BCD878128F923 
480 DATA 23ED5BC781CDCOBBE1ED5BC781 
490 DATA CDF6BB2AC781AFED4BCC8147C9 
500 DATA 00000000000000000000000000 


programa numero 2 


10 REM PROGRAMA 11 
20 DEFINT a,i,r,x,y 
30 x=320:y=100:r=100 
40 MODE O:INK O,O:BORDER O 
50 PRINT:PRINT SPC(51"POLIGONOS" 
60 PRINT:PRINT" Cuantos lados ?" 
70 PRINT:PRINT SPC(51"( 4 - 9 1" 
80 :FLUSH,O:a=O 
90 WHILE a<52 OR a>57: :GET,@a:WEND 
100 DEG 
110 MOVE x+r,y 
120 : GPEN, 0,1 
130 FOR i=O TO 360 STEP 360\la-481 
140 DRAW x+r*COSlil,y+r*SIN(il 
150 NEXT 
160 :FILL,x,y,1+INTIRND*151 
170 :SETCLOCK 
180 WHILE TIME<900:WEND 
190 RUN 



¡ 
'0_ .....:; 
(\. 
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TABLA N.o CUATRO 


IRESET 


Ningún parámetro. Resetea el ordenador pero 
retiene el programa basic, si lo hay. 
Inicializa el reloj a cero si no hay parámetros. 
lo coloca a «bajo» si sólo hay un parámetro y es 
menor que 65536. lo coloca a bajo + 65536 * alto si 
hay 2 parámetros. 
Asigna la pluma para gráficos y la opción de 
«plateado». 
Asigna el color del papel de gráficos. 
Espera a que se pulse una tecla y deja su código 
ASCII en variable-entera%. 
Vacía el buffer de sonido si el parámetro es igual a 
1. Vacía el de teclado si es igual a O. 
llena de color una figura. El origen debe estar en 
0,0. 


ISETClOCK [,bajo [,alto]] 


IGPEN opción, color 


IGPAPER 
IGET, @variable,entera% 


IFlUSH, buffer 


I Flll,x, y,color 
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, RAGONTORC 


Morac, tocado por la fuerza mágica de Merlyn, se erige en el 
único ser que puede enfrentarse al terrible poder de la 
hechicera Morag, de las tierras del norte de Europa y que 
pretende adueñarse del poder de Dargontorc. 


abían transcurrido muchos 
años desde que Maroc derrotó al se- 
ñor del kaos y le expulsó de su reino 
terrenol, liberando su almo sepulta- 
da con el hechizo de Avalon Wraith- 
bane. 
El cetro del poder y el anillo del sir- 
viente, son los únicos recuerdos que 
conserva Maroc de este terrible en- 
cuentro. 
Desde entonces decidió alejarse de 
los asuntos terrenales, adoptando la 
vida de un nómada en los gigantes- 
cos bosques, donde los viejos magos 
aún habitan. 
El reino de Britania es acosado por 
cientos de oscuras fuerzas, desde 
que las legiones romanas abandona- 
ron el intento de conquista. 
Vortigern, Lord de los cinco reinos 
de Britania hace un intento desespe- 
rado por mantener los cinco reinos 
unidos contra el ataque de las ardas 
bárbaras, que navegan por el Mar 
del Norte en busca de nuevos domi- 
nios. 
Como último recurso, Vortigern 
manda una flota sajona al encuen- 
tro de los bárbaros intentando de- 
fender las costas del este. 


THE LIVING ADVENTURE MOVIE 
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Durante varios años los sajones 
defendieron con fiereza el reino bri- 
tánico, hasta que la terrible Morag, 
bruja del norte, con sus hechizos con- 
siguió destruir su lealtad al reino bri- 
tánico. 
En una gran fiesta celebrada por 
los sajones en honor de Vortigern y 
sus señores de la guerra, sus anfitrio- 
nes se tornaron en traidores y asesi- 
naron al rey y a todos sus seguido- 
res. 
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La noche de los cuchillos largos, 
sumió en un completo caos a los cin- 
co reinos y los sajones comenzaron 
su plan de conquista uno por uno. 
A Morag la temible hechicera, no 
le interesaban ni los británicos ni los 
sajones, su plan era recobrar las cin- 
co coronas del Dragontorc de Ava- 
Ion, para hacerse con ayuda de ellas 
con la llama del poder, 
Sus planes comenzaron a tener 
éxito apoderándose de la primera 
parte de la corona de Vortigern, la 
del reino de Dumnovia. 
Habían transcurrido pocas noches 
desde la de los cuchillos largos cuan- 
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do Maroc, meditando frente a las lia- 
mos de su hoguera, fue tocado por 
una extraña fuerza, de las llamas 
surgieron extrañas formas y una dé- 
bil voz resonó en sus oídos. 
No advirtiendo presencia humana 
alguna, se dispuso a dormir con la 
sensación de ser observado por al- 
guien. En las largas horas de la no- 
che, antes de la salida del sol, por fin 
se rindió ante la extraña sensación, 
recogió sus escasas pertenencias y 
comenzó a caminar. 
Durante muchos días viajó descan- 
sando pocas horas, día a día, la ex- 
traña sensación crecía, Maroc no sa- 
bía hacia dónde se dirigía, sólo sa- 
bía que la fuerza le guiaba. 
Viajó hasta llegar a un claro en un 
tupido bosque, donde sintió el poder 
que emanaba del tronco de un árbol 
milenario, los últimos días del otoño 
cubrían de hojas el suelo, 



1 


Buscando entre las hojas caídas, su 
mano encontró un objeto metálico 
que emitía vibraciones caloríficas, 
inequívoco signo de la energía. 
Mirando fijamente al extraño ar- 
tefacto, comprendió que era la ma- 
gia que le había llevado hasta allí. 
Este era el signo del poder de 
Merlyn, el último de los grandes ma- 
gos, guardián de la herencia del dra- 
gón. Al empuñar el emblema del 
gran dragón, el poder pasó a través 
de su brazo, apoderándose de su sis- 
tema nervioso, hasta que sintió su 
cuerpo flotar en un lecho de aire ca- 
liente. 
De nuevo escuchó la voz, recono- 
ciendo en ella la voz de Merlyn, su 
maestro e iniciador en el mundo de 
la magia. 
i Por fin Maroe!, «tú eres el único 
que puede ayudarme, escucha...». 
Relatándole la terrible muerte de 
Morac concluyendo: «Durante mu- 
chos años he sido prisionero de Mo- 
rac.» La voz de Merlyn se desvane- 
cía y sus últimas palabras eran un sig- 
no inequívoco de la proximidad de 
la muerte. «Encuentra el cetro de la 
ley.» Maroc pudo escuchar el cruji- 
do de las hojas, percibiendo un aire 
helado y súbito que llenaba el bos- 
que, sus rodillas temblaron y calló al 
suelo, mientras permanecía tumba- 
do recobrándose de la sacudida re- 
pentinamente, se asombró de lo que 
yacía enfrente de él. 
Desde este momento nos hemos 
apoderado de la proyección astral 
de Maroc, conduciéndole por la fo- 
resta en busca del secreto de Dra- 
gontorc. Como mago discípulo de 
Merlyn, podemos utilizar hechizos y 
atacar a los distintos seres que nos 
atacan, nuestro camino a través de 
bosques y abruptos páramos, está 
jalonado por inimaginables peligros 
que sólo la magia podrá eludir. 
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Debemos tener cuidado con la 
gente que encontraremos, pues 
nuestros enemigos pueden hacerse 
pasar por amigos y alejarnos de 
nuestra meta. 
Merlyn nos ayudará en nuestra 
larga búsqueda, sus mensajes están 
encerrados en objetos de energía. 
Ser un gran mago requiere largos 
años de aprendizaje, no te desani- 
mes si en unas horas no consigues 
salvar a Merlyn, 
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MATCH DAV 
UtI AUTEtlTIC' 
PARTIDO DE 
FUTBOL EtI TU 
ORDEtlADOR. 
REGATEAR, 
, DRIBLA, 
CABECEAR, 
CEtlTRAR, 
CHUTA... V 
TRATA DE METER 
GOL SI ES QUE 
TE DEJA LA 
DEFEtlSA. 
CUIDADO 
TAMBIEtI COtl EL 
COtlTRATAQUE 
ItlTEtlTA ROBAR 
EL BALOtl O HAZ 
QUE TU PORTERO 
LO PARE. TODA 
LA EMOCIOtl DE 
UtlA FltlAL EtI 
TUS MAtlOS. 
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DRAGOttTORC 
UHA PELlCULA EN 
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TU AMSTRAD. 
EH LA IHGLATERRA 
MEDIEVAL HAS DE 
COHSEGUIR REUHIR 
LAS COROHAS QUE 
MORAG EL 
PERVERSO HA 
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TODO EL PAIS. A 
TRAVES DE TU 
VIAJE PODRAS 
OBTEHER PODERES 
MAGICOS QUE TE .t. J ,:..
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BASEBALL 
COttVIERTETE 
Ett EL 
CAMPEOtt 
DE ESTE 
FAttTASTICO 
DEPORTE. 
MAGttlFICOS 
GRAFICOS QUE 
IttCLUVEtt 
PAttTALLA DE 
I VIDEO GIGAttTE 
PARA SEGUIR 
LAS JUGADAS 
DE CERCA. ttO 
IttPORT A QUE 
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COttV RTIRA 
Ett EL tt.01 
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DU"" RU 
POR FIN EN 
AMSTRAD LAS 
AVEHTURAS DEL 
PEQUERo DE LA 
; FAMILIA WALLV. 
UH JUEGO QUE 
TE SORPREHDERA 
POR LA GRAN 
CAHTIDAD V 
CALIDAD DE SUS 
GRAFICOS. TODO 
PUEDE PASAR 
EH ESTE 
FAHTASTICO 
PROGRAMA QUE 
SUPERA LOS 
LIMITES DE LA 
IMAGIHACIOH V 
QUE SE HA 
COHVERTIDO EH 
UH CLASICO DE 
LOS JUEGOS DE 
ORDEHADOR. 
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SOUTHERN 
SELLE 
¡PASAJEROS AL 
TREN! Y TU A LOS 
MANDOS. 
PREPARATE PARA 
REALIZAR UN VIAJE 
EN "LA BELLA DEL 
SUR" LA 
LOCOMOTORA QUE 
fUE FAMOSA A 
PRINCIPIOS DE 
SIGLO. 
CONTROLARAS 
TODOS LOS 
J 1 I INSTRUMENTOS DE 
111111,11111111111. ABORDO: PRESIOH 1 
DIRECCIOH 1 
....... . ," u f J' FRENOS 1 CALDERA 1 
.:.0->' PARADAS, 
7> 
TRANSBORDOS... 
RESUMIEHDO TODO 
LO QUE HA DE 
HACER UH 
CONDUCTOR DE 
TRENINCLUYEHDO 
." Ua:- 1 TOCAR EL SILBATO. .1 


RAID 
DEFIENDE A 
U.S.A. y 
CANADA DEL 
ATAQUE 
NUCLEAR QUE 
HA LANZADO 
RUSIA CONTRA 
ELLOS. 
AL MANDO DE TU 
ESCUADRILLA 
HABRAS DE 
HACER UN 
VIAJE LLENO 
DE PELIGROS 

 HASTA EL 

 MISMISIMO 
KREMLlN y 
DESTRUIR LAS 
BASES DE 
, LANZAMIENTO 
SOVIETICAS. 
ACCION A TOPE. 
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PROBAMOS EL 
AMSTRAD PCW8256 


El PCW8256 ya no es noticia: es una tangible realidad. 
Dentro de la incesante corriente de novedades lanzada por 
Amstrad en los últimos tiempos, este equipo corresponde ya 
a un enfoque pura y exclusivamente profesional. 
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a máquina encaja perfec 0- 
mente en el concepto «llave en mano», es 
decir, se proporciona de una sola vez las le- 
rramientas necesarias para empezar a traba- 
jar a pleno rendimiento con el equipot sin ne- 
cesidad de adquirir programas o perifériGos 
e('tras. 
Un equipo completo 
El conjunto incluye los siguientes componen- 
tes: 
1. Monitor fósforo verde (90 colum- 
nas X 32 filas). 
2. Unidad de disco de tres pulgadas inte- 
grada en el monitor (la misma que en los mo- 
delos CPC). 
3. Teclado profesional, tipo máquina de 
escribir, especialmente diseñado para el pro- 
ceso de textos en castellano. 
4. 256 Kbytes de memoria RAM, esto es, 
cuatro veces la memoria del Amstrad 
CPC464. 
5. Impresora matricial controlada por pro- 
grama. 
Esto en cuanto al hadware. En lo que res- 
pecta al software, Amstrad entrega con el 
PCW8256 los siguientes programas: 
a) Sistema operativo CP/M Plus (versión 
3. 7), incluyendo una serie de utilidades para 
los programadores y otras para el usuario no 
interesado en la programación, como por 
ejemplo el sistema GSX para manejo de grá- 
ficos en pantalla, impresora o plotter. 
b) Lenguaje Basic, un intérprete llamado 
Mallard Basic compatible casi en su totalidad 
con el Basic de Microsoft. 
c) Una implementación de lenguaje Logo 
creada por Digital Research, el DR Logo. 
d) Un procesador de textos, creado por Lo- 
comotive, llamado Locoscript, y que merece 
una mención aparte por su potencia y senci- 
llez de uso de cara al usuario no iniciado. 
El conjunto de hardware y software, según 
información suministrada por Indescopm, dis- 
tribuidora oficial de Amstrad en nuestro 
país, costará al usuario final 169.900 ptas. 
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¿Quién va a usar el 
PCW8256? 
¿Y quién es el usuario final? ¿A qué 
tipo de personas está dirigido este 
sistema? 
Bien, una primera pista la suministra el nom- 
bre del ordenador¡ PCW significa, en inglés, 
Personal Computer and Wordprocessor, es 
decir, ordenador personal y procesador de 
textos. Esto huele a gestión de negocios des- 
de lejos, y efectivamente es así. A ello respon- 
de el diseño del teclado, que incorpora fun- 
ciones tales como la búsqueda y cambio de pa- 
labras en una sola tecla, y el Locoscript, el pro- 
grama de proceso de textos. 
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Desde luego, sería una lástima emplear una 
máquina con 256 K de RAM exclusivamente 
en proceso de textos, aunque ésta sea su fun- 
ción «principal». Amstrad así lo ha com- 
prendido, por lo que ha dotado a su ordena- 
dor de un sistema operativo standard, el CP/M 
Plus. Esto implica fundamentalmente dos co- 
sas: . 
- Poder usar cualquier programa que fun- 
cione bajo ese sistema operativo (Si está dis- 
ponible en formato de 3 pulgadas). 
- El PCW8256 queda convertido, por ar- 
te del CP/M, en un ordenador de «propó' 
sito genera!», extremadamente potente 
para ser un «8 bits», y sus campo de aplica- 
ción abarca un espectro muy amplio: desde 
proceso de texto a hojas de cálculo y bases 
de datos, pasando por todo tipo de lengua- 
jes y utilidades de programación, hasta apli- 
caciones que permitan comunicación con gran- 
des ordenadores a través de modems (cuan- 
do la infraestructura necesaria exista en Espa- 
ña). 
Conclusión: el PCW8256 está, sorprenden- 
temente, dirigido a todo el mundo, pero con 
la siguiente prioridad: 
- negocios a corto plazo; 
- programación y desarrollo de sistemas 
a medio plazo; 
- entretenimiento y juegos a muy largo 
plazo. 


¿Revolución? 
¿Y cuáles son los límites de este pa. 
radisíaco panorama, si los hay? O, 
¿podemos empezar a usar palabras 
tales como revolución y milagro a la' 
hora de hablar de la máquina? 
En mi opinión, existen límites. El primero, 
hasta qué punto el PCW8256 estará dotado 
en breve plazo de aplicaciones que permitan 
aprovechar sus cualidades para algo más que 
el proceso de textos. 
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El segundo, el precio. No cabe duda de que 
todo el paquete, al precio de 169.900 ptas., 
es una cantidad más que razonable, sobre to- 
do para una empresa, por pequeña que sea. 
Sin embargo, ese dinero, vox populi, es «una 
pasta)), y queda por ver el veredicto emitido 
por los profesionales liberales y por los sim- 
ples aficionados que deseen tener un equipo 
potente, compacto y versátil como éste. 
En cuanto a que el PCW8256 sea una re- 
volución, también en mi opinión depende del 
punto de vista con que se le juzgue: a pesar 
de las «dudas)) expresadas más arriba, res- 
pecto al precio pienso que sí; es auténticamen- 
te revolucionario. No obstante, la tecnología 
empleada en el ordenador no lo es, mucho 
más en un mundo donde empiezan a reinar 
los ordenadores de 16 bits. 
¡Cuidado!, esto no implica que el PCW8256 
funcione malo sea «un cacharro)), sino sim- 
plemente que, bien en aras del coste o por 
otras razones, Amstrad no se ha atrevido 
todavía a dar el salto hacia los 16 bits. 
Creo que esta última limitación, de cara al 
usuario, será bastante transparente, y en ab- 
soluto rebajará las prestaciones de un sistema 
a tales precios, pero el «vicio secreto)) de 
cualquier aficionado o consumidor de infor- 
mática es pedirle peras al olmo, o sea, lo últi- 
mo en tecnología a un precio de risa. 
La descripción detallada y exhaustiva del 
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PCW8256 requeriría una extensión de texto 
prohibitiva, por lo que vamos a comentar lo 
que nos ha parecido más relevante del orde- 
nador, siempre teniendo en cuenta que esto 
ha sido solamente una «toma de contac- 
tO» con el ordenador y lo que le acompaña. 


Punto por punto 


El monitor, como puede verse en las fotos, 
es de unas dimensiones respetables, bastante 
mayor que el de sus antecesores. Tiene una 
excelente resolución, y el texto se ve en él con 
toda claridad y nitidez, sin desagradables 
«temblequeos)). Posee un único mando, el 
control de brillo, y más de 80 caracteres por 
línea, concretamente 90 por línea y 32 líneas, 
es decir, un 35 por 1 00 más de superficie vi- 
sual que un 18M, por ejemplo. 
En él se encuentra integrada la unidad de 
disco, sólo que colocada en sentido vertical. 
La operación de introducir y extraer discos re- 
sulta fácil y cómoda, y uno se acostumbra rá- 
pidamente a distinguir cuál es la cara 1, la 2 
de un disco colocado en vertical. Por lo de- 
más, es idéntica a la de los modelos CPC en 
cuanto a capacidad. Debajo se encuentra un 
espacio dedicado a una segunda unidad de 
disco cubierto con una tapa. Esta segunda uni- 
dad tendría una capacidad de un Megabyte, 
sin formatear, dando 720 K por cara al ser for- 
moteado. Es de doble cara, doble densidad 
o sea, el PCW puede acceder a la informa- 
ción de ambas caras del disco sin tener que 
sacarlo de la unidad. 
En la parte posterior del monitor se encuen- 
tra el enchufe de la impresora y la interface 
Centronics, que también se conecta a la im- 
presora. 
El teclado se conecta a la extensión situada 
en la parte derecha del monitor y es, como se 
dijo antes, tipo máquina de escribir, un tecla- 
do profesional que llaman. Se puede separar 
a una distancia aceptable del monitor, deta- 
lle que se echa en falta en otros modelos Ams- 
trad, y el tacto y respuesta de las teclas es 
excelente. 
En su parte posterior parece tener unos ori- 
ficios preparados para colocarle unas «pa. 
titas)), que permitan elevarlo, pero el equi- 
po que estuvo en nuestras manos no las tenía. 
Esto no representa un problema serio a la hora 
de teclear, no obstante hay que tener cuida- 
do con la orientación del teclado con respec- 
to a la luz, porque las teclas, al ser cóncavas, 
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reflejan la luz de la habitación y brillan de for- 
ma bastante molesta (por este detalle supo- 
nemos que los orificios traseros están provis- 
tos para incorporar soportes que aumenten la 
elevación del teclado). 
También mentamos que está preparado pa- 
ra el proceso de textos en castellano, pues po- 
see la ñ y las vocales acentuadas pueden ob- 
tenerse mediante determinadas combinacio- 
nes de teclas. Estas están distribuidas en un so- 
lo bloque, con la suficiente separación entre 
ellas para que sea difícil pulsar dos a la vez 
accidentalmente. 
Del Hardware, sólo queda hablar un poco 
de la impresora. Es de tamaño y peso reduci- 
do, muy manejable, y no posee un solo man- 
do de los habituales en las impresoras excep- 
to el que permite mover manualmente el pa- 
pel. Todo lo demás, avance de línea, de pá- 
gina, etc., se realiza por programa, bien ba- 
jo Locoscript o bajo Basic. 
Por supuesto, es de matriz de puntos (¡el cos- 
te!), no de margarita, y posee un juego com- 
pleto de tipos de letra (según Indescomp, unos 
400), también controlados por programa, 
además de distintas «densidades» de impresión 
y tamaño de letra (incluyendo el famoso es- 
paciado proporcional). 
Está dotada de dos velocidades de impre- 
sión: la normal, 90 caracteres por segundo, 
y la de «calidad carta», 20 caraderes por 
segundo. Esta última denominación es un tanto 
optimista, comparada con lo que produce una 
impresora de margarita, pero puede servir. 
También se podría objetar que la velocidad 
de impresión (<normal» no es nada del otro 
mundo, pero hay que tener en cuenta que, ba- 
jo Locoscript, el procesador de textos, pode- 
mos editar y corregir un documento mientras 
imprimimos otro, con lo que no se notaró de- 
mora a la hora de imprimir excepto en situa- 
ciones excepcionales. La impresora puede ma- 
nejar papel continuo, gracias a su mecanismo 
tractor, así como hojas sueltas. Para este pro- 
pósito está dotada de un sistema de carga 
automática de papel. 


EL Software 
Amstrad entrega con el PCW8256 2 dis- 
cos: en uno de ellos se encuentra el CP/M Plus, 
sistema operativo que, en parte por ser bas- 
tante conocido y en parte por la complejidad 
que entraña, demanda un estudio más profun- 
do y un espacio más amplio del que podemos 
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dedicarle aquí. Baste decir que incluye, bas- 
tantes mejoradas, las utilidades necesarias pa- 
ra la manipulación de ficheros en disco y otras 
más dedicadas a los programadores, como en- 
sambladores, librerías, elc. 
El Logo de Digital Research también es co- 
nocido de nuestros lectores, porque hay ver- 
siones implementadas para disco en el 664 y 
en el 6128. Sospechamos que la revisión del 
PCW8256 es prácticamente análoga a la del 
6128, y digo sospechamos porque el espacio 
dedicado a él en los manuales es exiguo y la 
explicación pobre (existen en el lenguaje co- 
mandos que ni siquiera aparecen en el ma- 
nual), al menos en la versión inglesa que ca- 
yó en nuestras manos. Aprovecho para acla- 
rar aquí que todos los manuales y Locoscript, 
siempre según Indescomp, estarán traducidos 
cuando el equipo llegue al comprador. 
El intérprete de Basic, el Mallard Basic, en 
un dialecto clónico del Basic Microsoft, o sea, 
dedicado a la gestión y manejo de ficheros en 
disco. Nada de comandos de gráficos, ni de 
sonido, ni de ventanas. 
El Basic de Mallard incorpora tratamiento 
de ficheros secuencia les y aleatorios: normal. 
Pero también posee una facultad extremada- 
mente rara en ordenadores de este tipo: el ma- 
nejo y creación de ficheros indexados, es de- 
cir, regidos por claves de acceso a cada cam- 
po. En el manual se habla de que este tipo de 
ficheros están pensados para permitir incluso 
aplicaciones multiusuario. Lo que está claro es 
que los ficheros indexados constituyen un mé- 
todo de almacenar la información muy potente 
y flexible. Bien por el Basic. 
A propósito, el Basic si que se explica con 
gran detalle en el manual, comando por co- 
mando y con abundantes ejemplos. 


La vedette del PCW 
En cuanto al software, queda por hablar del 
programa que, sin duda, es la estrella de to- 
dos los que se dan con el ordenador y la ra- 
zón de ser del mismo: el Locoscrit, uno de los 
procesadores de texto de mayor potencia que 
hemos visto hasta ahora, incluyendo muchos 
de los que corren en ordenadores de 16 bits 
como ell BM pc. 
Locoscript se carga en memoria por el sen- 
cillo procedimiento de encender el ordenador 
e introducir en el disco que contiene el pro- 
grama. 
No es necesario llamar al CP/M ni nada pa- 
recido. 
Debo admitir que, cuando el programa car- 
gó, la primera impresión no fue buena. El mo- 
nitor rebosaba de información acerca del dis- 
co, de los ficheros que había en él y de otras 
muchas cosas sin aparente sentido. Mis espe- 
ranzas de poder manejar Locoscript, al me- 
nos un poco, sin recurrir al manual se desva- 
necieron como el humo. 
Sin embargo, para ser justo, y después de 
superada la decepción inicial, debo recono- 
cer que el manual es necesario, no sólo por 
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la cantidad de posibilidades y opciones que 
Locoscript ofrece, sino porque está estructu- 
rado con gran habilidad, introduciendo al 
usuario novato en el uso del programa paso 
a paso, de lo más sencillo a /0 más complejo, 
y con tal abundancia y detalle en los ejemplos, 
que es prácticamente imposible equivocarse. 
En fin, el manual es extenso, pero por una 
vez, con motivo justificado. Imagino que la 
versión española, si no experimenta las habi- 
tuales ((dificultades» en la traducción, aún 
será más sencilla. Esperemos que Indescomp 
se supere a sí misma y nos sorprenda suminis- 
trando unos manuales del PCW8256 y de Lo- 
coscript medianamente legibles, en contra de 
lo que tiene por costumbre. 


Pensando en el usuario 
Para mayor facilidad, el disco de Locoscript 
incluye ficheros de texto que se usan, en el ma- 
nual, a modo de ejemplo constantemente. Con 
ellos podemos practicar todas las funciones del 
programa, hasta la más avanzadas, desde el 
primer momento. 
Tanto si nuestros lectores conocen las fun- 
ciones ((standard» de un procesador de tex- 
tos, como si no, podemos asegurar que con 
Locoscript y un documento puede hacerse de 
todo, absolutamente de todo lo que se le pue- 


ICHA DEL PCW8256 


HARDWARE. Incluye: 
- Monitor monocromo. 
- Teclado y unidad central con 256 K 
RAM. 
- Unidad de disco 169 K formateada. 
- Impresora. 
- Microprocesador Z80. 


SOFTWARE. Incluye: 
Programo Facilidad Potencia 
de uso 


CP/M plus 
CP/M utilidades 
LOGO 
Mallord Bosic 
Locoscript 


buena 
? 
buena 
excelente 
excelente 


regular 
regular 
excelente 
buena 
excelente 


COMERCIALIZADO POR: Indescomp. 
P.V.P.: 169.900 ptas. 
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da ocurrir. El trío ordenador, programa e im- 
presora se compenetran a la perfección. 
Locoscript está regido por una estructura je. 
rárquica de menús, a los cuales se accede nor- 
mamente pulsando las techos de función del 
teclado, cada una asociada en la pantalla a 
su correspondiente etiqueta. 
El menú principal es el llamado «gestión 
del disco», en el cual tenemos las opciones 
típicas: editar un documento, crearlo, impri- 
mirlo directamente, y manipular los ficheros 
de disco, esto es, borrar, cambiar de nombre, 
mover, etc., junto con la curiosa opción de 
«impresión directa», o sea, usar la im. 
presora como una máquina de escribir. 
Partiendo de aquí, por una maraña de sub- 
menús, accedemos al resto de las opciones. 
Por destacar alguna, podemos elegir el tipo 
de letra para cada sección de texto, podemos 
subrayar palabras, diseñar distintos formatos 
para un documento o parte del mismo, etc. 
No podemos describirlas todas. 
Siempre que se elige una opción, aparece 
una ventana en la pantalla donde se encuen- 
tra la «sugerencia» por defecto del progra- 
ma (norma/mente acierta) respecto a lo que 
queremos hacer. 
Por ejemplo, si yo cambio la paginación de 
un documento, he terminado y quiero salir, Lo. 
coscript presenta una ventana en la que se en- 
cuentran una serie de posibilidades de salida, 
entre las cuales está, naturalmente, la de con- 
servar y fijar la paginación que acabo de ele- 
gir para ese documento. Pues bien, ésta apa- 
rece iluminada; simplemente pulsando ENTER, 
la nueva paginación queda aceptada. 
Si por alguna razón cambio de idea y quie- 
ro anularla o hacer otra cosa, basta tan sólo 
desplazarse por la ventana con las teclas del 
cursar, elegir la opción que sea y pulsar EN- 
TER. Es así de fácil con todas las cosas que se 
pueden hacer con Locoscript, algunas de ellas 
verdaderamente complejas. 


Menús O comandos: 
como usted guste 
Se ha tenido en cuenta al usuario experimen- 
tado, aquel que no necesita recorrer menú tras 
menú de opciones para hacer las cosas por- 
que lleva ya tiempo usando el programa, de 
dos formas igualmente ingeniosas: resumien- 
do todas las opciones importantes en dos pe- 
queñas ventanas, sin agruparlas por catego- 
rías, e incluso suprimiendo los menús comple- 
tamente, porque cada opción tiene una como 
binación de letras, un comando, que la iden- 
tifica, por lo que si la incluimos en un texto, 
el programa sabe que se trata de un coman- 
do y obra en consecuencia. 
Para elegir el documento con él que quere- 
mos trabajar, nos desplazamos por la panta- 
lla de «gestión de disco» con los cursores has- 
ta llegar al que interesa, que aparecerá en ví- 
deo inverso. Luego, pulsar ENTER, y el texto 
es traído del disco inmediatamente a la me- 
mona. 
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El programa hace un uso eficiente de la me- 
moria del PCW8256, porque reserva y usa 
112 K como disco virtual, es decir, es como 
si tuviéramos una segunda unidad de disco en 
el ordenador, con la ventaja de que las ope- 
raciones de lectura/escritura son muchísimo 
más rápidas, y la desventaja de que si hay un 
corte de luz, pues, perdemos lo almacenado 
en el disco virtual. 
El manual recomienda, con toda razón, el 
uso de esta zona como área transitoria de do- 
cumentos y/o datos solamente. 
Esta técnica del disco virtual también es usa- 
da por CP/M, y los programas CP/M proba- 
blemente serán capaces de utilizarla, 
El control de la impresora, a través de Lo- 
coscript, es total: podemos alterar tipos de le- 
tra, tamaño de página, pie y cabecera, cali- 
dad de letra, impresión o no y lugar de im- 
presión del número de página, reimpresión de 
un documento a partir de determinada pági- 
na. etc. Sin problemas. 
A mí, personalmente, el programa me ha im- 
presionado. Creo que aprovecha al móximo 
las posibilidades del PCW8256 y permite to- 
do tipo de libertades con cualquier documen- 
to de cualquier extensión, aunque después de 
dos días de manejarlo resulta difícil hacerse 


una idea exacta de las posibilidades de este 
programa, dada la potencia que exhibe. 
Cuando estábamos acabando de escribir es- 
te artículo, Indescomp presentó oficialmente 
a los medios de comunicación el PCW8256, 
e informó de una serie de nuevas característi- 
cas que no pudimos observar antes por po- 
seer la versión inglesa del ordenador, y pro- 
gramas prototipo en lugar de la versión defi- 
nitiva. 
Así, nuestro Locoscript tenía fallos; concre. 
tamente, al realizar una operación en la que 
se definía la densidad de escritura, el ordena- 
dor se bloqueaba siempre, tanto con copias 
del programa como con el disco original. 
Tuvimos la ocasión de ver que: 
- La versión definitiva de Locoscript en cas- 
tellano, completamente traducida, tanto ma- 
nuales como el de los propios mensajes del 
programa, esta libre de errores, al menos de 
éste. Indescomp nos aseguró que ha sido ex- 
haustivamente revisada y depurada por repre- 
sentantes suyos altamente cualificados en co- 
laboración con Locomotive, creadora de Lo- 
coscript. 
- El CP/M Plus y el DR Logo también han 
sido traducidos al castellano, al igual que los 
manuales y toda la documentación del orde. 
nadar. 


Nota: para comentar la facilidad de uso y la potencia de las utilidades de 
programación de CPIM, nos hemos basado en nuestro conocimiento del CPIM Plus. 
Los manuales de AmstrCld no dan información suficiente sobre ellas para iuzgarlo 
adecuadamente, Se limitan a remitir al lector a un libro publicado al efecto, por lo 
que sabemos no disponible en España. 
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CUATRO EN RA YA 3D 


COMPATIBLE 
CPC 464 
CPC 664 
CPC 6128 


ucho me temo que 
este juego apenas necesite presfnta- 
ción. Pocas personas habrá que en 
«pubes» o sitios parecidos no hayan 
visto un tablero de madera agujerea- 
do, puesto en posición vertical, con 
unas ranuras en su parte superior 
por la que se introducen fichas de co- 
lores. 
El juego consiste en colocar cuatro 
fichas, normalmente del mismo color, 
en «raya», bien sea horizontal, ver- 
tical, o en diagonal. 
Esto no es demasiado fácil que di- 
gamos; para ganar se requiere una 
estrategia, actuar según un plan. Por 
ello, este tipo de juegos siempre se 
han clasificado como de inteligencia, 
aunque no lleguen a las cotas del 
ajedrez, por ejemplo. 
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La simulación de juegos de «pen. 
sar» en ordenadores, siempre ha te- 
nido el doble atractivo de jugar con 
un compañero infatigable e infinita- 
mente paciente, y de estudiar, des- 
de el punto de vista del programa- 
dor, cómo puede modelizarse una 
estrategia o método de previsión en 
una máquina. 
Así que, tanto el jugador curioso, 
como el programador ávido de 
aprender a simular «inteligencia», 
encontrarán materia de estudio más 
que sobrada en este programa. 
Por otra parte, el autor del juego 
lo ha complicado de veras: ha cons- 
truido una estructura tridimensional 
formada por cuatro tableros. Jugar 
contra el ordenador no es fácil, so- 
bre todo en los últimos niveles de los 
que dispone (9). 
La presentación del programa, a 
mi juicio, es impecable, y su manejo 
se explica por sí mismo: todas las ins- 
trucciones necesarias están en pan- 
talla. 
Desde el punto de vista del progra- 
mador, yo destacaría las rutinas en 
las que el programa decide su movi- 
miento, valorando la posición, y 
aquellas en las que se maneja los dos 
relojes que cuentan el tiempo trans- 
currido entre cada jugada, uno pa- 
ra el jugador humano y otro para la 
máquina. 
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10 MODE 1: CLS 
2(1 PEN 3: F'APER O: PR 1 NT CHR$ (22) +CHR 
$ «1) : : PRINT CHR$ (23) +CHR$ (O) : 
30 DIM XY(144,2) .TABLE(361.4),GRID( 
144) 
40 RANDOMIZE TIME:CLS 
60 GOSUB 2100:REM DEFINE CARACTERES 
70 PRINT CHR$(23)+CHR$(O) 
80 F'RINT CHR$ (22) +CHR$ (O): CLS 
100 tep I:Xerlgin-40:Yerlgin 240:GO 
SUB 1840:REM dibuJa la cuadrlcula 
 
uper 1 or 
11n top=O:Xorlgin 84:Yorlgln=152:GO 
SUB 1840:REM dibuja la segunda cuad 
rlCU]ñ 
12(1 Xorigln-13U:YorlQln=64:G05UB lB 
4(I:REM dibuJ
 Id tercera cu
drlcula 
1
0 Xorigin-176:Yerlgln--24:GOSUB ! 
84t):REM dlbu)a la cUAdrlcul
 lnfarl 
er 
150 ORIGIN O,O:GOSUB 1150 
¡6u PFN !:LDCATE 
6.22:PRINT"ELIGE 
NI'Jel_:"::PEN ;:. 
170 (\$=INf EY$: IF A$-"" DI-< (VAL(A$) 
1) OR (VAL(A$»91 THEN GOTO 170 
18(1 PRINT A$:LEVEL
VAL(A$) 
19'" LOCAT" 
9>24:f-'RINT"NI'JEL: "+A$ 
200 FOR 1-1 TO 200(1: NEXT: GOSUB 72(1 
210 PEN 2:LDCATE 27,22:PRINT "DESEA 
S MOVEF;":LOCATE 27.23:F'RINT"PRIME¡;0 
., S/W 
2::'0 Ao¡, INI FYo¡,: 
\$=UPPER$ (A$): IF A$ " 
" OR (A-t "S" ANO A-t" "
J") 1 HEN GOT 
O :220 
"30 IF A$ "S" THEN STAkT=O:PEN 3:LO 
CA1F 28.:'4:PI<INT " ** SI **" ELSE S 
TART-l:I'OJ 3:LOCATE ::'8.24:PRINT " 
 
I 
IO n" 
::'40 FOR 1 1 TO 2000:NEXT:GOSUB 7::'0 
250 EXIT O:CLOCf' I:SEC !:MTN O 
280 X ::'
.4:Y 29f':CX 19:LY 1'::MM=2:GO 
SUB 420(1 
:'9() X 60:Y 
(I(I:CX' ,¿:CY=17:MM-:;:.:GOSU 
B 42(H) 


, EVrRY 49, I hOSUB 4160 

I'" WHILf EXIT O 
:'2(' IF START=1 lHFN STARr-255:GOTO 


350 


J30 GOSUB 3000:I-<EM 
340 IF EXIT=! THEN 
350 GOSUB 
410:REM 
ador 
360 WENO 
370 PRINT CHR$(22)+CHR$(0) 
::;80 IF SCORE}HISCORE THEN HISCORE-S 
CORE:SCOR
-O:P
N ::':LOCArE ]O.19:PRI 
NT USING "MMjj":HISCORE:LOCATE 10,21 
:PRINT USING "MIIM":SCORE 
0'.90 PHI 2:LOCATE 27,22:F'RINT "OTRO 
JUEGO" 
400 LOCATE 30.23:PRINT"(S/N)">" 
410 A$= 1 N
:EY$: A$=UPPER$ (A$) : I F A$=" 
" O¡; (A$<>"S" ANO A$<'''N'') THEN GOT 
O 410 
420 IF A$="S" THEN PEN 3:LOCATE 28, 
24:PRINT " ** SI **" ELSE PEN 3:LOC 
ATE 28,24:PRINT " ** NO **" 
4.30 FOR 1=1 TO 2000: NEXT: GOSUB 720 
44(1 IF A$-"S" TH
N GOSUB 3340:GOTO 
160:REM limpia la pantalla para etr 
a partida 
450 GOTa 2410 
46() REM chequeo para ver 51 hay gan 
actor 
490 FINISHEO=O:CLOC
=O 
510 OI:PRINT CHR$(22)+CHR$(O): :LOCA 
TE 28. 22: r'EN ?: F'R [NT" CHEQUEO ": E] 
: COUNT'l, 1 

,30 WH 11 F FIN 1 SHFD O ANO COU
JT'l. 360 
540 Ir GRIO(TABLE(COUNT'l..II)=PLAYER 
ANO GRID<TABIX(COUNT'l..2»-F'LAY
R A 
NO GRIO<TABLE(COUNT'l..3»-F'LAYER A
IO 
GRID<TAE<I é (COIJNT'l.. 4») -PLAYEF. THFN 
rINISHED-l:EXIT =1 EL SE COLJNT'l.=COUN 
T'I.-+I 
S50 W
ND 

60 IF FINISHEO' '] lH
N 680 
570 CLnC

-O 

,80 TArinf-F:F'RTNT CHR$(:'2)+CHR$((I): 
590 IF FINISHEO-I AND PLAYER-COMPUT 
ER THEN PEN 3:LOCATC ::!7.::'I:PRINT"U 
** ** Hn **": L[JCATE 27.22: F'kINT"* 
*":L(jCAT
 27,23:PRINr"****,* 
**¡I**":PEN 2:LOCATF 29.22:PkINT"YO 
GAI-JO' " 
6(1(1 IF F 1 NISHFD 1 ANO PLAYEF<=rILlMAN 


tu Jugada 
GOTO ::;60 
Jugadi\ de] 


orden 


r--. 


J 



S erie Oro 


THEN PFN 3,LOCArE 27,21:PRINr":I'*

 
,*
""":L,OCATE :'7.?2:f-'RINI":I 
:1":\ Or:AH '7,23:F'RHH"*H**"H 
'U":F'("1 :':1 O['(<TF ::<t.:n:f"RIN'r"TU r,i\ 
I'IAS" 
610 FOR 1=1 TO '¿OO(l:NfoXT I:GOSUB J::' 
o 
6:'0 PRJNI CHRS(:'
)+CHR.(t): 
630 5FC HSEC+t: 1F SEC
59 THEN SEC=O 
64(' MTN=H
ITN:X '.,.4:V-290:CX=19:CY 1 
2: MM=;': GOSUB 420(' 
65n SEC'-CSEC >1: 1 r SEC ,.<';9 THEoN 
;EcC-O 
660 MTN CMTN:X=60:Y-200:CX 2:CY=17, 
MM ".: GOSIJE< 4200 
670 CSEC=O: HSEC=(t: CMTN=O: HMTN-O 
680 IF F1NISHED o THEcN CLOC"=I 
691'1 RETURN 
700 REM limpIa la ventana de mensaJ 
es 
720 TAGOFF: PR I NT CHr'$ (22) +CHR$ !CI) : 
730 LOCATE 26,21:F'RINT STRING$(14," 
"1 
740 LOCATE 26,22:PRINT STRING$<14," 
") 
750 LOCATE 26.23:PRINT STRING$<I4," 
"1 
760 LOCA TE 26.24:F'RINT STRING$(14." 
"1; 
770 LoCATE 26.21 
780 PRINT CHR$(22J+CHR$I1): 
790 RFTURN ' 
80(1 REM obtiene y ana]i
a l
 JLlgada 
devolvIendo un valor de 1-16 en la 
variable NUM 
820 NU
I= 1 
830 TAGOrF 
840 PRINT CHR$1221+CHR$(I), 
850 PRINT CHR$(23)+CHR$II): 
R60 DI:MOVE -1, -I:DRAWR 0,0,1 
870 FOR unTO 1 C18 S TEP ".6: NN=U+NUM 


89(' TAG: 
1fIV¡
 xv INr4. 1) . XV INN.:n : F'RI N 
T CURS$::MoVE XYINN.l),XYeNN.2)-16: 
FR 1 NT ClJRS Ii:: TAGIWF: NE X'I U 
910 El 
"'20 A$-IN, EY$: IF A$=.... THEN 9:'0 
90" DI, 
IO'/E -1, -1: DRAWR O. 0.1 
940 FOR u-n TO 108 STEP 36:NN U+NUM 


960 TAG:MOVE XYINN. IJ.XYINN.2):PRIN 
T CURS$: :MUVE XY'NN. J 1 .XVINN.='-16: 
o'RINT ::URSa:: TAGOFF,r.IE.XT U 

8(i el 
990 lF A. CHkf(
r31 THEN NUM=NUM-I 
lono IF A$ CHR$e
F2) THEN NUM=NUM+I 
:)1<'1 IF As-r:HR$ ,? FI) THEN NlIM NUN>6 
1 (CO 1 F A$=CHR$ (8-F(') THEN NUM 'IUM-6 
J 0:'-.0 1 F Af.=CHF$ ('.r,» THE.r
 GOTo 11. ,(. 
1 (,
 (' 1 F NUM' 
 6 rHEN NU
I-NUM-36 
105':' 1 F NlIM 1 THEcN NUM "IU
H 36 
1 (06(' DI: MnvE -1, - 1 : DRAWR ". O. 1 


107n FOR r 1- (1 TO I [)8 :::;Tr-F -,6: NN-LJ+
.J 
U
1 
109(1 T{,G:MOVE ').'Y(NN,J)1'iY(NN.-'\:I'f,] 
NT CURS$: :MOVF .v'NN. 1) .XYINN.2)-16 
:p
'INr ClIRSI$: :TAGr'F-f :NEXT LI 
111'-' El 
11:-'0 Gn'rn q:n 
\1 
O TAGO"'F:RETURN 
114C! REM dlhuJa pantal1a 
1150 ORIGTN 0.0 
1160 LOCA1E 20.7:
EN 
:PR1Nr STRING 
$1:'1."*") 
117u LOCA1E 20.
:PRINr .....:LOCAIE 4 
O.:-.:F'RINT '*": 
1180 LOCATE 20.4:
R]NT STRING$(71." 
... ) 
1190 PAF'ER (', 
120(1 LOCATE 22. :,'.: ¡-'EN 1: F'HINT "3D-CU 
ATRO EN RAVA" 
1210 MoVE. 390. 10:DRAW 390.330,2 
1220 DRAW 630.330:DRAW 63('1,IO:DRAW 
390.10 
1230 MOVE 394. 14:DRAW 394,326.2 
1240 ORAW 626,
26:0RAW 626.14:DRAW 
394,14 
1250 MOVE :"94.80:DRAW 6:'6.80 
1260 MOVE 394,84:DRAW 626,84 
1270 MOVE O.O:DRAW 0.399, I:DRAW 639 
,399:DRAW 639.0:DRAW 0.0 
1280 PEN I:LOCATE 26.6:PRINT"Para m 
over LISa." 
1290 LOCA TE 27.7:PRINT"las cursares 


1300 PRINT CHR$(221+CHR$(I) 
1310 PEN 3:LOCATE 26,6:PRINT" 
i

6-
6
ATE 27,7:PRINT" 


1330 ZONE 1 
1340 SCORE=O:HISCORE=O 
1350 PRINT CHR$(22)+CHR$(01 
1360 F'EN 2: LOCATE 3C1, 9: PRINT"SUBIR" 


1370 LOCATE 30, 19:PRINT"BAJAR" 
1380 LOCATE 38, 13:PRINT .. O":LOCATE 
38.14:F'RINT .. E":LOCATE 38.15:PRIN 
T'I RII 
1390 LOCA TE 26. 13:PRINT"I"+CHR$(8)+ 
CHR$(10)+"Z"+CHR$181+CHR$II0)+"Q" 
1400 PEN I:LOCATE 31. 14:PRINT"COPV" 
1410 PEN 3 
1420 LOCATE 28. 14:PRINT CHR$(242)+C 
HR'5( 154) 
1430 LOCATE 36,14:PRINT CHR$(1541+C 
HR'5 12431:: F'EN 3 
1440 F'EN 3 
1450 LOCA TE 32,11:PRINT CHR$(240)+C 
HR$(8)+CHR'5110)+CHR'511491 
1460 LOCATE 32. 16:PRINT CHR$(149)+C 
HR$ (8) +CHR'5 1 10) +CHR$ (241) 
147(' PEN 2:LOCATE 3,23:PRINT"HUMANO 


";:F'EN I:PRINT CHR$(242)+CHR$1243) 
: :F'EN ':':F'RINT .. "+CHR$11431 
1480 PEN 2:LOCATE 2,24:PRINT"MADUIN 
A ":: F'EN 1: PHI NT CHR$ 12421+CHR$ (243 
1: ,PEN ¿.: PRINT " "+CHR$ I 143): 
H90 F'EN 1: LOCATEo 2.19: PRINT "RECOR 
D:":LOCATE IO,19:PRINT USING """*", 
HISf;ORE 
1500 LOCA TE 2,21:PRINT "PUNTOS: ":LO 
CATE 10,21:PRINT USING """"":SCORE 
1510 F'RI NT CHR$ (22) +CHR$ 1 1 1 
1520 X-334:Y=29(t:R=45:C-l:GOSUB 410 
<'> 
1530 X=334:Y 290:R 41:C=2:GOSUB 410 
O 
1540 FOR lOTO 60 STEP 5:MOVE X+( 
SINlltPI/30)IIR-511,Y+ICOSII.PI/30) 
. IR-S) ): DRAW X+ (SIN I I *PI/30) *R). V+ 1 
COSII*PI/30)IRI.3:NEXT 1 
1580 X=60,V-200:R 4S:C=2:GOSUB 410(" 
1590 X=60:V-20(¡:R 41:C=3:GoSUB 4100 
1600 FOR 1-0 10 60 STEP 5:MOVE X+( 
SIN (UPI /30) I IR-5) l. V+ (COS( UP1/30) 
* (.R-5) 1: DRAW X+ (SIN!I IP1I30) *R), Y+ ( 
COS(I*PI/:'-.O)tR) .I:NEXT I 
164(' PRI NT CHR$ (23) +CHR$ 1 11: R 35 
1660 HSEC-O,HMTN O:CSEC=O:CMTN O 
1670 RETURN 
1680 REM dibuja la p,eza del Jugada 
r en su SItIO correspondiente 
1710 TAGOFF:OI 
1720 IF PLAYER=HUMAN THEN COL 2 ELS 
E COL 3 
1730 PRINl CHR$ (221 +CHR'5 (1) : : F'RINT 
CHR$(23)+CHR'511); 
1740 MOVE -1,-I:ORAWR O,O,COL 
1750 IF 11>=37 ANO 1<-41) OR 11> 73 
ANO 1< 77) OR (1) 109 ANO 1< 1131 
THEN S$ EDGE$:SI'5 EOGEI$:GOTO 1770 
1760 S$ BLK$:SI$-BL
I$ 
1770 TAG:MOVE XYII,I),XYII,2):PRINT 
S$::MoVE XV(!.I), XVII.2)-16:F'RINT 
SI'5;:TAGOFF:EI 
1780 RETURN 
1800 REM dibuja cada cLladricula en 
la pasiC:ion obtenida de Xorigin e Y 
orlgln 
1840 ORIGIN Xarig,n,Varig,n:X=2.8:Y 
-2.8 
1850 X=2,8:Y=2,8 
1860 MOVE XtI0.Y*40 
1870 DRAW XI5,V*38,I:DRAW X*29.V*7: 
DRAW X*75.V*28:0RAW X*52.V*56 
1880 MOVE X*45,V*52:DRAW X*67.Vt25 


Publicidad 
El rumor pierde fuerza, Fuentes bien informadas aseguran que no es cierto que 
YOUR COMPUTER vaya a ser editada en España. 
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IB90 MOVE X*3B.Y*49:DRAW X*60, Y*21. 
5 
1900 MOVE X*31 , Y*46: DRAW X*5:!,.V*18 
1910 MOVE X*23,Y*42:DRAW X*45.Y*14, 
5 


1920 MOVE X*15.V*39:DRAW X*37,Y*11 
1930 MOVE X*9,V*33:DRAW X*53,Y*S3 
1940 MOVE X*12.Y*2B:DRAW X*57,Y*4B 
1950 MOVE X*17,Y*23:DRAW X*62,Y*43 
1960 MOVE X*20,V*IB:DRAW X*66,V*:::B 
1970 MOVE X*25,Y*13:DRAW X*70.Y*33 
19BO IF top o THEN GOTO 2050 
1990 MOVE X*10,Y*41:DRAW X*51.Y*59: 
DRAW X*53,Y*54 
2000 MOVE X*45.Y*52:DRAW 
2010 MOVE X*3B.V*49:DRAW 
2020 MOVE X*31,Y*46:DRAW 
2030 MOVE X*23,Y*42:DRAW 
2040 MOVE X*15,Y*39:DRAW 
2050 DRAWR 0.0,3 
2060 RETURN 
2070 REM lnic:ializa los carac..teres 
defInidos por el usuarIO. las corden 
adas X-Y, introduce la comblnaclon y 
ganadora en la matrIz, llena la mat 
rlZ que representan las cuadriclllas 
con cpros e inIcial Iza el contador 
de sprites 
2100 SYMBOL 
2110 SYMBOL 
2120 SYMBOL 
2130 SYMBOL 
24 
2140 SVMBOL IB:-.. 224. 192.192. O, O, O. O 
.0 
2150 
2160 
217(1 
21BO 


Xj43,V*S5 
X*36. Y*SI 
X*29,V*4B 
X*21,V*45 
HI3.Y*41 


AFTER 179 
180,(1,(1,0.(1,3.15,15,:1 
181.31,15.15.3,0,0.0.(1 
182.0.0,(1.0,(1,192.192,2 


SVMBOL 
SVMBOL 
SVMBOL 
SYMBOL 


IB4.0,O.0.0.0.0.0,1 
185.7,15.15.3,0. O, 0,0 
1B6.0.0.0.0.0,O.192.224 
187,0.0.(1,1,7,31,127,25 


5 


2190 SVMROL 188.255.127.63,31,14.0. 
O.tI 
2200 SYMBOL 1B9.0.0.0.192.224.240,2 
48.252 
2210 SYMBOL 190,252.24B.224,12B.0.0 
.0.0 
2220 CURS$-CHR'I>11B7)+CHR$11B9):CURS 
I'I>-CHR$I IBB) +CHR'I> I 190) 
2230 BU;$=CHR$ I 1 BO) +CHR'I> 1 182) : BLK 1 $ 
-CHR$11Bl)+CHR$IIB3) 
2240 EDGE$=CHR$IIB4)+CHR$11B6):EDGE 
1$-CHR$11B5)+CHR$IIB3) 
2250 FOR 1=1 TO 144:REAO XYII.I),XY 
<I.2):NEXT 1 
2260 l[]NE 10 
2270 INI; O. o: BORDER 27: INK 1.26: INK 
2.24: H.n-: 3.6 
2320 FOR IX=1 TO 54:READ TABLEIIX,I 
).TA8LEIIX.2),TA8LEIIX.3),TABLEIIX, 
4) : NEXT IX 
23:0'.0 FOR IX-1 TO 54:TA8LEIIX+54.1) 
TABLEIIX.1)+:::6:TABLEIIX+54,2) TABLE 
IIX.2)+36:TABLEIIX+54,3)-TABLEIIX,3 
)+36:TA8LEIIX+S4.4)=TABLEIIX,4)+36: 
NEXT IX 
2:::40 FOR IX-l TO 54:TABLEIIX+l0B, 1) 
TABLEIIX,I)+72:TABLEIIX+IOB,2)=TAB 
LE I IX, 2) +72: TA8LE I IX+IOB, 3) -TABLE I I 
X,:::)+72:TABLEIIX+IOB.4) TABLEIIX,4) 
+72:NEXT IX 
2350 FOR IX=1 TO 54:TABLEIIX+162.1) 
-TABLEIIX,I)+10B:TABLEIIX+162.2) TA 
BLEIIX.2)+10B:TAHLEIIX+162,3)=TABLE 
IIX,3)+10B:TABLEIIX+162.4)-TABLEIIX 
.4)+10B:NEXT IX 
236<' FOR IX 217 TO 360:READ TABLEI 
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IX.I).TABLEIIX,2) .TABLEIIX.3),TABLE 
IIX,4):NEXT IX 
2370 FOR IX 1 TO 144:GRIDIIX) O:NEX 
T IX 
23B<' HUMAN= 10: COMPUTER-2<': CLOCK=O 


2400 RETURN 
241(' TAGOFF 
2420 PRINT CHR$(22)+CHR$10) 
2430 F'RINT CHR$ (23) +CHR$ (O) 
2440 INV 1,76:F'EN I:MODE 2 
2460 END 
2470 RETURN 
2S40 REN 
2600 REN datas conten.endo todas la 
s cardenadas X-Y ql!e permi ten coloc 

r la
 pie2as en cualqltler paslcion 
2650 DATA 16

407, 142.398,.122
389.1 
01.380,79.37(1, 58. 
6(J. 174.2.94. L53. :.8 
4,133.374.112.365,90.355.68.345,186 
.379.165.370.145.361.125
351.102.34 
L,80,331.197,365 
2660 DATA 177.::56.157.346.135.337.1 
12.327.91,317.209,351, IB9, 342. 16B,3 
33.147,323.125.313.102,303,220, :r36, 
200,327.179,318.159.308,136.298,114 
.2BB ' 
2670 DATA 206,3IB. 1B6.310. 166.300.1 
45,290. 125.2BO,102.271,21B.306, 197, 
296.177.286.156.278. 135.267. 11S.
58 
.230,291.209, 2B2, 1B9, 272,169.263.14 
7.254.124.243 
26BO DATA 242,277.221.26B,201,25B.1 
80,249.157,239.134,229.253.263.233. 
254.212.245,191
235. 168,225. 146,215 
.264,249,244,239.223,230.202.220, lB 
0,211.158.200 
2690 DATA 253.231,2::2.222.212,212.1 
91,202.170.193.147.1B3.264,2IB,244. 
20B,223. 199.203, 190,IBl.179. 159,170 
.276,203.255.193.235.IB4,215.176.19 
3. 165 
 1 70. 1 55 . .. 
2700 DATA 2B7. lB9.267.1BO.747. 170.2 
26.161,204. ISI. IB1, 141.299,175,279. 
166,259.1S7.237. 147.215. 137,192. 127 
.310.161.29Ú.15

269. 14
,248. 13

22 
6.127.203,112 
271(1 DATA 298
 142,278
 134,258,124.2 
37.114,216,105,193,95.310,130,290,1 
20.269,111. 24B. 102,226,92,204, B2. ::.2 
2,115.302,106,2BI.97.260.B7,23B,77. 
216.67,333.101 
2720 DATA 313.92.293.B2.272.73,249. 
63,227.53.345,B7:32S:7B:303;69:2B2, 
59
260.49.238,39.356,72.336.63.316, 
54.294,44.272,34.249,24 
273(' REM todas las cDmh1 naciDnes ga 
nadoras posibles 
2760 DATA 1.2.3.4.2
3.4,5,3.4

.6.7 
.8
9.10.8,9, 10, 11.9.10, 11, 12.13, 14, 
IS, 16, 14.15.16.17.15.16.17, 1B.19,20 
,21.22.20,21,22,23,21,22.23,24,25.2 
6,27.2B.26.27.2B.29 
2770 DATA 27,2B,29.30.31.32,33.34.3 
2,33,34.35,33,34.35,36 
27BO DATA 1,7,13,19,7,13,19.25.13.1 
9.2S,31,2,B.14,20,B.14.20.26.14,20. 
26.32,3,9,15,21,9.15,21,27,15 1 21.27 
,33,4.10.16,22.10,16.22.2B,16.22.2B 
,34.5.11.17.23 
2790 DATA 11,17.23,29.17.23,29.:0'.5.6 
, 12.18,24, 12.18,24.30
 18.24,30.36 
2BOO DATA IB.23.2B.33,12. 17.22.27. 1 
7,22.27. 32,6, 11 . 16. 21 
 11 . 16,21 , 26, 1 
6.21,26.31,5,10.15.2(1,10.15.20.25.4 
,9,14.19,13,20.27.34,7.14.21. 2B, 14, 
21.2B.35 

810 DATA I ,B. 15.22.B. 15.
2.29. 15.
 
::'. :"'9. :'6, :',9. lJ...... 23,9. 16.2'3. 
O. :;, 10. 1 
7.24 
?B::'(I [)
TA 1
37.T....'.1(I9.2.38.14.11(J.3 
. c.9. 75. 1 1 ¡ . 4 . 4 O. 76. ¡ 1 2 . 5. 4 1 . 77, 1 13. 
6.47. "lB. 114.7.4 "..79. 115. B, 44. BO. 116 
.9. 4
. 81, 117. 1 ('.46. B2 . liB. 11.47. B3. 
119.17.48.84.120 
2830 DATA 13.49.85.121. 14.50.B6. 12¿ 
.15.51.87.123. 16. 5
. 88.124.17. 5.J, 89 
. 125. 18. 54. 9t 1 , 1 :6. 19.55. 91 , 127.20.5 
6. Q2. 178. ;'1. 
7 .9:'. 12cr, 2:? 58. 94.130, 
23.59.95.131 
"'B40 DATA 24.60.96.137.25.61.97,133 
.26.62.98.134,27,63.99.135,28.64,10 
(l. 1

.29.65. 101. 137.30.66.102,138,3 
1.67.10
.139 

B50 DATA :::2.68,104.14"".33.69.105.1 


41 . :-:4, 70, 106. 142. :::5,71 . 107. 14:;,36,7 
7.1 OB. 144 

8
(1 DATA 1.
B.75. 112.::'.39.76. 113.3 
.40.77.114.4.39.74.¡n9.s.40.7S,110, 
6.41.76,111.7.44,81.118,B,45.B2.119 
.q
46.8:::.170.10.45.BO.115.11.46,81. 
116.17.47.8:'.117 
:'870 DATA 13.50.87.124, 14.51.BB. 125 
. 15.52.89. 126. 16. Cj 1 .86. 121 . 17.52. 87 
.1'2. 18.53.88, 1
3. 19.56.93. 130.20.5 
7.94. 131.
1.58.95. 107.72.57.92. 127. 
73.58,9""':.128 
:.'88(1 DATA 74.C::,9.94. 129.25.62.99. 136 
. 7
. 6::. 1 no 
 137, ';'7. 64. 1 (1 1 . 138.28.63, 
98. 133.29.64.99. 1
4,30.65. 100.135.3 
1.68. I(I5
 142.
2.69.106. 143.33.70. 10 
7.144 
2890 DATA 34.69.104,l:::9.3S.70. 105.1 
4(1. -::.6. 71.106,141 
:'900 DATA 1.4:-:.85.177,2.44.B6.12B,3 
,45.87.129
4.46.88.1
(I.5,47.B9, 131. 
6.48,90.1 :.::'. 7 
 49. 91.13::-;.8.50,92.134 
. 9. 51 . 9;:.'"., 1 .:-,5. 10. 52. 94. 1 36. 1 1 . 53, 95, 
137.1
,54.q6.1::8 
79\() DATA 13.55,97.139.14.56.98,140 
.15.57,99.141.16.58.1(J(J
 142.17.59.1 
(11. 143, 18.60. 102. 144. 19,49.79, 109.2 
O. 
(1. 80.110.:? 1.51.81. 111.22.52.82,1 
1::'.
:".5--:,B3. 113 
?Q70 DATA 24.54.84.114,25.55.85.115 
.26.56.B6.116.27,57,B7.117.28,5B.BB 
.IIB.29.59.89.119.--:0.60.90.120,31.6 
1.91.1:' 1. "':2. 67. 92.122.33.63,93.123, 
34.64,94. 1 
'4 
29
(J DATA 35.65.95.125.36,66.96.126 
794n DATA 1.44,87.130.2.4S.BB.131.::: 
.46.eQ. 1]2.4.45.86, 127.5.46.87. 128, 
6.47. BB, 129.7. :",0. 93.136. B,51. 94.137 
,9.5:'.95.1 :':8.1(1,51.92.133.11.52.93. 
134. J2.53.94. 1
5 
29
(I DATA 13.
6.99.J4:'. 14.57. 10(1. 14 
:3, 15. 58
 101. 144. 16.57.98. 139. 17.58. 
99.140.1 B. 59. 100.141. 19.50. B1. 112.: 
o. 5I. 52.113.21, ::;2. B:::. 114.22.51,80.1 
09.23.52.81.1.10 

96(1 DATA 24.5
.82. 111,
5.56.87. 118 
.
6.57.B8, 119.27,
8.89.1
U.::'8.57.86 
. 115.29. 5R
 8/, 11 b. 
'o. 59.88.117. 
 1.6 
2.93. 124.12.6""':.94. 125.33.64,95. 1:6. 
34 
 6:; 92. 121 
297(1 DATA 35.64,93. 12
.
6.65.94.1=
 
2980 REM esta rutlna proces. t1uestr 
a jugada y la devLlelve solo 51 e
 v 
alldd 
3000 r INISHED=(' 
:-,010 DI 
3020 SEC-HSEC+ 1 : 
ITN HMTN: 1 F SEC '59 
THEN SEC=0:MTN=MTN+1 
3000 F'LAYER HUMAN 
:::040 El 
3050 TAGOFF 
3060 WHILE FINISHED-O 
3(1]0 DI 
30BO PRINT CHR$(22)+CHR$(0): 
3090 PEN 3:LOCATE 27.:1:PRINT"***** 
*******":LOCATE 27.22:PRINT"* 
*": LOCATE 27.23: PR1NT"* UU uu 
***":PEN 2:LOCArE 2B.22:PRINT"TU M 
UEVES" 
3100 El 
3110 GOSUB 820 
3120 F'RINT CHR$(22)+CHR$10): 
3130 IF GRIDINUM)<>O AND GRIDINUM'::: 
6)()0 AND GRID(NUM.72)<
0 AND GRID( 
NUM+IOB)(>O THEN PEN 3:LOCATE 27,21 
:PRINT"************":LOCATE 27,22:P 
RINT"* *":LOCATE 27.23:PRI 
NT"u**********":F'EN 2:LOCATE 30,2: 
:PRINT"ILEGAL" ELSE FINISHED=I:GOTO 
3150 
3140 FOR 1-1 TO 2000:NEXT:GOSUB 720 
:GOTO :::070 
31S0 PLAVER=HUNAN 
3160 TAGOFF:PR1NT CHR$(22)+CHR$II): 
3170 I=NUM:G05UB 1710 
31BO IF NUM+36 >144 THEN GOTO 3200 
3190 IF GRIDINUM+:::6)-0 THEN I NUM:G 
OSUB 1710:NUM-NUM+36:GOTO 3170 
3200 WEND 
3210 FOR TX-I TO 10:S0UND 1,60.10.1 
5:FOR DELAY=I TO 250:NEXT DELAY:GOS 
U8 1710:NEXT TX 
3220 GRID(NUM)-HUMAN 
3230 PLAVER-HUMAN:GOSUB 490:GOSUB 7 
20 
3250 TAGOFF 


I
 



3260 IF NUM>-J09 ANO NlIM<' 144 THEN 
SCORE=SCORE+LEVEL 
3270 IF NUM>-73 ANO NUM
=I(18 THEN S 
CORE SCORE+(2*LEVEL) 
"280 IF NUM> :!.7 ANO NUM(-72 THEN SC 
ORE SCORE+C3*LEVEL) 
3290 IF NUM"-I ANO NUM( 36 THEN SCO 
RE-SCORE+(4*LEVEL) 

300 OI:PRINT CHH$(22)+CHR$(0):LOCA 
TE 10.
I:PRINT USIN6 "IIIIII":SCORE:PR 
rNT CHR$(22)+CHR$(I);:EI 
:'::'10 RETURN 

340 FOR 1=1 TO 144: IF 6RIOCI) <> O 
THEN PLAYER-6RI0(1):GRI0(1)-0:GOSU 
B 1710 
3350 NEXT 1 
3370 I,ETURN 
3380 REM rutlna de jugada de l,a maq 
uina segun nlvel de juego 
3410 FINISHEO-O 
:0-420 DI 
3430 SEC CSEC+I:MTN=CMTN:IF SEC)59 
THEN SEC=(.: MTN MHI+ 1 
3440 PLAYER-COMPUTER 
3450 El 
3460 NLJM 0:VAR-20 
3480 TAGOFF 
3490 F'R 1 NT CHR$ C 22) +CHR$ «1) ; 
3500 DI 
3510 PEN 3:LOCATE 27,21:PRINT"***** 
*******":LOCATE 27,22:PRINT"* 
*":LOCATE 27.23:PRINT"********* 
***":F'EN 2:LOCATE 29,22:PRINT"PENSA 
NOO" 
35?O El 
_'.530 WH 1 LE VAR( >0 ANO FI N 1 SHEO<) 1 
3540 RESULT 3*VAR 
::550 FOR 11%-0 TO 162 STEP 54 
3560 IF INT(RNO(I)*LEVEL)-O ANO VAR 
=20 THEN 11 %-11/,+54: GOTO 3650 
3570 FOR 1%=1 TO 54:N'l.-I'l.+II'l. 
3590 IF GRIO(TABLE(N'l..I»+GRIO(TABL 
E(N'l..2) )+GRIOCTABLE(N'l..3»+GRIO(TAB 
LE(NZ.411() RESULT THEN GOTO 3640 
3600 IF GRIOnABLE<N'l.,I» VAR ANO G 
RIO(TABLE(N'l..2»=VAR ANO GRIO(TABLE 
(N'l.,3»-VAR ANO 6RIOCTABLE(NY,.4» O 
THEN FINISHEO I:NUM=TABLE(N'l.,4):I% 
=54: 11%-162: GOTO 3640 
3610 lF GRIOnABLE(N'l..2) )=VAR ANO G 
RIOCTABLE(N'l..3» VAR ANO GRI0(TABLE 
(N'l.. 4» =VAR ANO GRIO nABLE (N'l" 1» =0 
THEN FINISHEO I:NUM TABLECN'l..I): 1% 
-54: 11 % 162: GOTO 3640 
3620 IF GRIO(TABLE(N'l.,I»=VAR ANO G 
RIOCTABLE(N'l..2» VAR ANO GRID(TABLE 
CN'l.,4)=VAR ANO GRI0(TABLE(N'l.,3» O 
THEN FIN1SHED=I:NUM TABLE(N'l.,3): 1% 
-54: 11'l.-162:GOTO 3640 
::630 IF GRIOnABLE(N'l.,II)-VAR AND G 
RIOCTABLE(N'l.;3»)-VAR ANO GRIO(TABLE 
CN'l..4»-VAR AND GRID(TABLE(N'l..2»-0 


Publicidad 


THEN FINISHED I:NUM TABLE(N'l.,2): 1% 
=54:1J'l.=162:GOTO 3640 
3640 NEXT 1% 
3650 NEXT 117. 
366C' IF FINJSHED=I THEN GOTO 3750 
3670 FOR 11% 216 TO 324 STEP 36 
3680 IF INT <RND (1) fLEVEL> =0 THEN 11 
% 11'l.+36:GOTO 3730 
3690 FOR J'l.=1 TO 36: N % = 1 % + 1 1% 
3710 JF GRID(TABLECNZ.2)-VAR ANO G 
RID(TABLECN'lo.3) )=VAR ANO GRIO(TABLE 
(N'l.,4»=VAR ANO GRID(TABLECNZ.I) )=0 
THEN FINISHEO=I:NUM=TABLE(N'lo. 1):1% 
-36: 11% 324 
3720 NEXT 1% 
37':,0 NEXT 11 % 
3740 VAR=VAR-IO 
3750 WEND 
3760 TAGOFF:PRINT CHR$(23)+CHR$(I): 
3770 IF FINISHFD-I THEN GOTO 3980 
3780 IF LEVEL < 5 THEN GOTO 3950 
3790 VAR=10 
3800 WHILE VAR()30 AND FIN1SHEO<>1 
3810 RESULT 2*VAR 
3820 FOR NUMBER - 1 TO ::60 
3830 IF GRID(TABLE(NUMBER.I»+GRIOC 
TABLECNUMBER.2) )+GRIOcTABLE(NUMBER. 
3»+GRIO(TABLECNUMBER,4»<>RESULT T 
HEN GOTO 3910 
3840 IF GRIO nABLE (NUMBER. 1) VAR A 
NO GRI0(TABLE(NUMBER.2»=VAR THEN F 
INISHEO-I:NUM TA8LE(NUMBER.3):VAR 3 
0:60TO 3910 
3850 IF GRIDITABI ECNUMBER.2» VAR A 
ND GRIOCTABLECNUMBER.3) )=VAR THEN F 
INISHED=I:NUM=TABLE(NUMBER,4):VAR-3 
O:GOTO 3910 
3860 IF GRIO nABLE <NUMBER. 3» -VAR A 
ND GRIOCTABLE(NUMBER.4»)-VAR THEN F 
INISHED I:NUM-TABLE(NUMBER.2):VAR=3 
O:GOTO 3910 
3870 IF GRIOCTABLE(NUMBER, 1) )=VAR A 
ND GRID(TABLE(NUMBER,4»-VAR THEN F 
INISHEO I:NUM TABLE(NUMBER.3):VAR=3 
O:GOTO 3910 
3880 IF GRIO(TABLE(NUMBER. 1» VAR A 
ND GRIDCTABLE(NUMBER,3»=VAR THEN F 
INISHEO-I:NUM TABLECNUMBER.2):VAR-3 
O: GOTO 39)(. 
3890 IF GRID(TABLE(NUMBER.2» VAR A 
NO GRID(TABLE(NUMBER,4»=VAR THEN F 
INISHED=I:NUM TABLE(NUMRER.3):VAR 3 
o 
39('0 
3910 
3920 
3930 
30 
3940 WEND 
3950 WHILE FINISHEO O 
3960 NUM=INT(RNO(I)JI61+1: IF GRIOCN 
UM) O THEN FINISHED-I 


1 F FIN 1 SHEO- 1 
NEXT NUMBER 
IF FINISHED=I 
VAR-VAR+10: IF 


THEN NUMRER-360 


THEN GOTO 3940 
LEVFL(7 THEN VAR 


S erie Oro 


3970 WEND 
398(. PLAYER=COMPUTER 
3990 I-NUM:GOSUB 1710 
4('00 1 F NUM+36 > 144 THEN GOTO 4020 
4010 IF GRID(NUM+36) o THEN 1 NUM:G 
OSUB 1710:NUM NUM+36:GOTO 3990 
4020 FOR T'l.-I TO 10:SOUND 1,30,10,1 
5:FOR DELAY
I TO 250:NEXT OELAY:GOS 
UB 1710:NEXT T'l. 
4030 GRIDCNUM)-COMPUTER 
4040 PLAYER COMF'UTER: GOSUB 490 
4050 GOSUB 720 
4Ú60 TAGOFF 
4070 RETURN 
4(180 rellena un clrculo de coardena 
da
 X-Y
radlo 'R- y color 'C. 
4100 FOR 0% Y-R TO Y+R STEP 2 
4110 INC=INT(SOR( (RJR)-«Y-O'l.)*(Y-O 
'l.») )+0.5) 
4120 MOVE X-INC,O'l.:ORAW X+INC,ln,C 
4130 NEXT 0% 
4140 RETURN 
4150 REM movJento del reloj 
4160 IF CLOCK O THEN GOTO 4250 
4170 IF PLAYER HUMAN THEN HSEC-SEC: 
HMTN=MTN:X 334:Y=290:CX 19:CY-12:MM 
2 EL SE CSEC=SEC:CMTN-MTN:X 60:Y 20 
ú:CX 2:CY-17:MM=3 
4180 TA60FF:MOVE X,Y:ORAW X+CSIN(SE 
C*PI/30)*R),Y+(COS(SEC*PI/30)*R).MM 
4190 SEC=SEC+I:IF SEC>59 THEN SEC-O 
:MTN-MTN+I 
4
00 MOVE X.Y:DRAW X+(SIN(SEC*PII30 
)*R).Y+(COS(SEC*PI/30)*R),MM 
4210 ZONE 1 
4220 PRINT CHR$(22)+CHR$CO): 
4230 LOCATE CX.CY:PEN MM:PRINT USIN 
6 "IIII:IIII":MTN,SEC 
4240 PRINT CHR$(22)+CHR$(I); 
4250 RETURN 


Poro que lus dedo. 
no reol,cen e/ /robojo duro, M. H. AMS 
TRAD lo hace por ti. Todos/os I,slodos que induyon 
esle logotipo se encuenlrcn o lu dlsposiáón en un cos, 
se/le mensual, solicílonoslo. 


Lo solución sobre este misterio 



 


Lo revisto de ordenaaores de mayor venta en toaa EUROPA 
¡LA PROXIMA SEMANA EN ESTA REVISTA! 
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ORDENACION 
ALFABETICA 


Análisis 


Una de las principales misiones de un ordenador, es como su nombre indica la 
ordenación de datos. 
E,n esta ocasión Análisis aborda el tema de la ordenación con un programa en el cual una 
vez introducidas todas las palabras las saca en orden alfabético. 
El programa también puede usarse con números, ordenando éstos de menor a mayor, o 
también utilizando palabras y números a la vez, en cuyo caso aparecerán los números 
en orden creciente en un primer bloque y las palabras ordenadas alfabéticamente en un 
segundo bloque. 


10,20 Nombre del programa y línea de 
a.steriscos que lo separan del resto de instruc- 
ciones. 
30 Limpia la pantalla en caso de que tu. 
biésemos algún mensaie anterior en ella. 
40 El LOCATE, coloca el cursar de texto en 
la décima columna de la quinta fija. 
Procediendo después a situar el mensaje del 
INPUT, donde nos pide el número de palabras 
a situar, el cual es almacenado en la variable 
PALABRAS. 
50 Dimensiona una matriz con tantos ele- 
mentos como palabras deseemos ordenar. 
60.100 Ciclo FOR... NEXT con tantas os. 
cilaciones como elementos contiene la varia- 
ble PALABRAS. 
70 Sitúa el cursar de texto en la posición 
13,13, colocando después el mensaje palabra 
no. indicándonos el número de la palabra que 
vamos a teclear. 
80 Coloca una serie de espacios en blanco 
encima de la palabra tecleada anteriormen. 
te, produciendo su borrado. 
90 Sitúa el cursar de texto debajo del men- 
saje palabra no. De forma que la palabra te- 
cleada queda bajo éste, siendo almacenada 
en la variable alfanumérica 0$ con su núme- 
ro de orden. 
100 El NEXT cierra el ciclo. 
110.150 Dos ciclos anidados que son los 
responsables de todo el trabaja de ordena- 
ción. 
Su funcionamiento es el siguiente: 
El primer ciclo toma una palabra con un nú' 
mero de orden t, la cual es comparada en el 
segundo ciclo con la palabra del siguiente nú' 
mero de orden, es decir t+ l. 
Si la t + 1 es mayor que la t, el programa pa- 
sa a compararla con la siguiente palabra in. 
crementando i en uno unidad, repitiendo el 
proceso hasta que encuentra una palabra me- 
nor, o completa el ciclo FOR... NEXT 120-140, 
es decir, todas los palabras que quedan sin or- 
denar. 
En cambio si t+ 1 es menor que t, el progra- 
ma cambia de orden las dos palabras de for- 
ma que ahora queda delante la palabra me. 
nor (el ordenador entiende por menor la pa- 
labra que en orden alfabético está delante). 
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Completado este ciclo el programa pa
a al 
principal 110-150, para proceder con la si- 
guiente palabra. De esta forma las que ten. 
gan un número menor que t, quedan ordena- 
dos definitivamente, continuando el bucle la 
ordenación con los elementos desordenados 
que se encuentran detrás. 
120 Compara dos elementos de forma que 
si el primero es menor que el segundo, alma- 
cena éste en la variable b$, pasa a la 0$ (t) 
el valor de 0$ (j) y asigna a 0$ (j) el conteni- 
do de b$, consiguiendo de esta forma cam- 
biar el orden entre las dos, de forma que aho- 
ra se encuentra delante la menor. 
160 Una vez realizada todo el proceso de 
ordenación limpia la pantalla para proceder 
después al listado de todas las palabras. 
170.200 FOR... NEXT, responsable de sa- 


11 


car por pantalla la lisIa de palabras ordena- 
das. 
180 Representa la palabra de número de 
orden marcado por el ciclo. 
190 La senencia IF, compara si el número 
de palabras representadas en pantalla es múl- 
tipla de 24, en este caso aparece el mensaje 
* * Pulse una tecla para continuar ", el ciclo 
WHILE... WEND se ocupa de mantener en 
pantalla la lista de 24 palabras hasta que pul. 
semos una tecla. Pulsada ésta nos represen- 
tará las siguientes 24, repitiéndose el proce- 
so hasta acabar con toda la lista de palabras. 
Para volver a ver la lista de palabras, bas- 
ta con teclear: GOTO 170 (ENTER). 
Y ésta aparecerá de nuevo en pantalla des- 
de la primera hasta la última, en bloques de 
24 elementos. 


----u 


/ 
! j 


1 


10 RE:.M ORDENACION ALFABETICA 
20 REM,;t:***.*.:t.:t..:tI**.*J** 
30 CLS 
40 LOCATE 5.10: INPUT"N\.tmero de 
p
l abr.as a ordii'nillr '; piIII 
bras 
50 OIM a$(pal
tJ,.&
) 
60 FOR n"l TO palabras 
70 LOCATF 13,13:PRINT"PALAElRA 
No. ";n 
8(1 LOCA TE 13, 15:f'F"<lNTII 


9(1 LOCA TE 13,15: INPUT ",'lo(n) 
100 NEXT n 
110 FOR t21 TO p.alabras 
120 FOR j t+l TO pal
br

 
130 IF a$(J)<
$(t) THEN b$-a'< 
t) :a$(t)- .,tI(J) :a$(J)=b$ 
1010 NEXT J 
15(1 NEXT t 
16(1 CLS 
170 FOR n 1 TD pal abril. 
180 PR1NT 03.$ (n) 
19(1 IF nJ24-1NT(nJ24) THEN PRI 
NT' * * Pl11 se una tecl a para e 
ontlnu.ar t_ ': WHILE IN

EY'" 11' 
:WFND 
200 NEXT n 


tJ 


1 I '1
,
1.:"'''11 I 
- '\ 


!,I 


- .".1 
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AMSTRAD 464 Verde 
AMSTRAD 6128 
DISKETTE 3" 
INTERFACE DISCO 5,25" 
CINTA C.15 ESPECIAL ORDEN 


- 
--- 
- - 
- - 
- - - 
--- -- 
--- 


59.900 ptas. 
99.900 ptas. 
1.050 ptas. 
5.900 ptas. 
85 ptas. 


¡DL _ cf 
Jf7
L 
. ,. ., ... 



 OM 
I 
I 


,
 
/ .- 
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SOFTWARE ENTRETENIMIENTO (CASSETTE) 
COMBAT LlNX 
EXPLODING FIST 
ALlEN.8 
KN1GHT LORE 
GREMLlNS 
JUMP JET 
MIGHWAY ENCOUNTER 
FRUIT MACHINE 
FIGHTER PILOT 
AJEDREZ 3-D 


/' 


1.925 ptas. 
2.095 ptas. 
1.875 ptas. 
1.875 ptas. 
2.095 ptas. 
2.695 ptas. 
1.875 ptas. 
995 ptas. 
2.050 ptas. 
2.340 ptas. 


l ¡!lliR1'Ul' !\I: 
1.495 Ptas. 
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LIBROS 
CURSO AUTODIDACTICO BASIC AMSTRAD 
(Contiene manual y dos cassettes) 2.695 ptas. 
HACIA LA INTELIGENCIA ARTIF. 1.300 ptas. 
40 JUEGOS EDUCATIVOS 1.800 ptas. 
MUSICA y SONIDO PARA AMSTRAD _ 1.300 ptas. 
PROGRAMANDO CON AMSTRAD 1.900 ptas. 
CODIGO MAQUINA PARA PRINCIPIANTES CON 
AMSTRAD 1.900 ptas. 
TECNICAS DE PROGRAMACION DE GRAFICOS 
EN EL AMSTRAD 1.800 ptas. 


'J:'

 


... .... 


1.975 Ptas. 



 
E
 


 


'"" 
) 
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Tu pedido lo puedes recibir contra-reembol- 
so (libre de gastos), llamando a los teléfonos 
(91) 2330735 Y (91) 2330781. 
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EL HOMBRE DE L . I 'l. 1'
I
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SPANNERMAN 
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1.495 Ptas. 
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I ACCESS . .'. _1> -,- 
I 'fHIU"' I , . mBArTU ! -moN 
2.395 Ptas. 



LAGS 


Si hoy algo que se use con frecuencia en un programo, seo 
lenguaje máquina o no, es lo tomo de decisiones en función 
de que se cumplan ciertos condiciones. Esto, en código 
máquina, se hace mediante lo inspección de ciertos 
indicodores, los flogs. 


recuerda que es un flag? Sí, 
un flag es un indicador que nos permite co- 
nocer el estado de las cosas en nuestros pro. 
gramos. Para nosotros es una guía tan vital 
como el radar para un piloto o el aparato de 
tomar la tensión para un doctor. 
Pese a su importancia, los flags son en esen- 
cia bastante simples. Podemos imaginarios ea. 
mo una variable numérica primitiva que sólo 
nos permite tener dos valores: 1 cuando el flag 
está activado ylo cuando esta desactivado. 


Un flag, un bit 


Otra forma de verlos es como un registro 
de un solo bit, puesto que un bit puede tomar 
solamente los valores O ó l. 
Dependiendo de lo que ocurra en un pro- 
grama, el micra activa o desactiva los diver. 
sos flags. Encontramos el primer flag cuando 
sumamos números. Ya que el número más 
grande que se puede almacenar en un byte 
es 255, cuando tenemos dos números que jun. 
tos suman más de 255 nos encontramos con 
problemas. 
Como hemos visto, sobrepasando 255 en un 
byte -en registro o en memoria- es algo pa- 
recido a cuando el cuentakilómetros de un co- 
che da una vuelta completa: vuelve a comen. 
zar desde cero. - 
Hasta aquí el registro A (el registro de tra- 
bajo de ADD y SUB) debe preocuparse de: 


255+ 1 =0 
255+2= 1 
255+3= 1 


y así sucesivamente. Algo muy parecido ocu. 
rre cuando intentamos ir por debajo de cero 
en una sustracción. 
Si no nos cree pruebe los programas 1 y 11. 
El primero hace: 
254+3 (&FE+&03) 
y el segundo: 
3 - 4 (&03 - &04) 


En ambos casos la respuesta esta almace- 
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nada en &2FFB, el primer byte del espacio de 
trabajo del Hexer. 
Por supuesto, el ZBO no hace caso de los re- 
sultados aberrantes cuando las cosas dan una 
vuelta de reloj (se sobrepasa en un sentido o 
en otro el valor límite): activa lo que conoce- 
mos como el Carry flag. Esto es, el Carry flag 
se hace l. A la inversa, si no hemos sobrepa- 
sado por encima (o por debaío) del límite, el 
flag está desactivado, a O. 
Así que, el micra se ocupa de hacer: 


255 + 1 = O activa el Carry flag 
254 + 1 = 255 desactiva el Carry flag 
O - O = O desactiva el Carry flag 
3 - 4 = 255 activa el Carry flag 


El Carry flag nos permite saber cuando las 
cosas van mal. 


El propio Amstrad se 
encarga 


No hay forma de que, como programado- 
res, podamos examinar un flag en particular 
directamente, pero el micro está bastante aten. 
to para tener en cuenta el valor de un flag. 
Como hemos visto en artículos anteriores, 
dependiendo de que el Carry flag esté acti- 
vado o desactivado, podemos saltar a diferen- 
tes partes de nuestros programas con instruc- 
ciones tales como: 
JP C (opcode &DA) 
que es salto con el Carry activado y: 
JP NC (opcode &D2) 
que es salto si el Carry flag NO está activa- 
do. 
El programa 111 efectúa un sonido de una 
forma muy simple. Lo que hace es sumar dos 
números ?1 y ?2. Por supuesto, son etiquetas 
(Iabels) solamente -queremos decir que hay 
que meter aquí los dos bytes que necesitamos 
sumar- y si queremos hacer un POKE con 
ellos, sus posiciones de memorias son &3001, 
&3003, respectivamente. 
Las primeras dos líneas del programa 111 ha- 
cen la suma. La instrucción ADD activará o de- 
sactivará el Carry flag convenientemente pa. 
ra avisamos si nos hemos excedido de 255. 
LD (&2FFB), A 
entonces coloca el resultado en el siguiente 


'O 
:;) 

 


-;1 


, 


. ;.o;...'" 
 


byte del espacio de trabajo del hexer, para 
su examen posterior. 
Atención a esto: la instrucción LD no afecta 
nunca a ningún flag. (Hay solamente dos ex- 
cepciones sin importancia, LO, A,R y LO A,I 
con las que probablemente nunca tropezare- 
mos.) Deja los flags sin tocar para nada. Esto 
es una parte de información muy a tener en 
cuenta por su utilidad. 
Así que después de este LD, el estado del 
Carry dependerá del resultado del ADD. 
Podemos probarlo con: 
JP NC, &300F 
Esto comprueba si el Carry flag está activa. 
do. Si no lo está -es decir, si nuestra solución 
no excede el límite del byte- el programa sal. 
ta a la posición de memoria &300F, la cual es 
simplemente el final de las rutinas en código 
máquina, ya que contiene &C9, RET. 
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Obsérvese que por el momento saltamos 
avanzando e ignoraremos así algunas instruc- 
ciones máquina si el Carry no está activado. 
No obstante, si el Carry está activado -o 
sea, que hemos excedido 255 en nuestro 
resultado- nos lleva directamente al siguien- 
te bit del código máquina después de JP, que 
es: 


lO A,&07 
CAll CharOut 
que, como seguramente recuerda, provoca un 
pitido. Entonces nos encontramos con RET. 


DIRECCION OPCODE 
3000 3E FE 
3002 (6 03 
3004 32 F8 2F 
3007 (9 
Programo 1 


MNEMONICO 
lD A, &FE 
ADD A, &03 
LO (&2FF8), A 
RET 



 l' 
I 
I 
, 
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El resultado de todo esto es que nuestro pro- 
grama será un pitido producido por las sumas 
que provoquen la activación del Carry flag 
-las que nos dan resultados «erróneos»- 
sin embargo, deja pasar las otras sumas sin 
problemas. 
Sencillo, pero útil 
Está bien, un pitido de advertencia no es oi- 
go muy impresionante, pero nos ilustra sobre 
cómo podemos detectar la señal del Carry flag 
y actuar en consecuencia. En la práctica utili- 
zaremos esta ramificación técnica para hacer 
algunos cálculos aritméticos más, antes de te- 
ner la respuesta correcta, 
Si experimentamos cambiando los valores 
sumados -en las posiciones de memoria 
&3001, &3003- veremos si tenemos el salto 
esperado o no. 
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Reemplacemos nuestro siguiente: 
JP NC, &300F 


por un 


J P C, &300F 
cambiando la cuarta línea del programa 111 a: 
3007 OA OF 30 J P C, &300F 
¡Cuidado al reemplazar con estos tres bytes 
los anteriores! 
En este momento saltamos cuando el Carry 
está activado. lo cual sólo ocurre cuando la 
suma tiene una solución de mayor valor que 
la extensión del byte, así que no se hace un 
«beep» para valores fuera de rango, 
Si la solución queda dentro de los límites y 
el Carry es desactivado, no realizamos el sal- 
to, y escuchamos el «bepp)). 
De modo que cambiando un solo byte, el có- 
digo de operación para JP NC -&02- al có- 
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DIRECCION OPCODE 
3000 3E 03 
3002 D6 04 
3004 32 F8 2F 
3007 C9 
Programa 2 


MNEMONICO 
LD A, &03 
SUB &03 
LD (&2FF81, A 
RET 


digo de operación para J P C -&DA- tene. 
mas un efecto del programa completamente 
contrario. 
De cualquier manera, lo esencial de la de- 
mostración es que cuando sumamos (ADD) dos 
bytes sencillos, si la solución excede de 255 el 
Carry flag se activa para avisarnos. 
Le puede extrañar que le llamemos Carry 
flag (indicador de acarreo). Bueno, si puede 
dar marcha atrás en sus recuerdos, en la es- 
cuela lo usábamos para señalar que nos <dle- 
vábamos)) a la columnas de las decenas 
desde la columna de las unidades cuando ha- 
cíamos sumas iY lo que nos «llevábamos» era 
muy importante!. 
Si teníamos que sumar: 
DU 
16 
+ 9 


nuestro metódico pensamiento funcionaba: 9 
más 6 es 15, que es demasiado grande para 
la columna de las unidades, así que pondré 
5 debajo de las unidades y «llevaré)) una 
decena a la columna de las decenas. 
Trabajábamos de un modo muy parecido al 
código máquina. En este momento nuestra 
«columna de unidades)), un byte senci- 
l/o puede contener hasta el número 255, des- 
pués de esta cantidad tenemos que «llevan), 
o añadir uno, a un byte que representa la se- 
gunda columna de nuestra suma (columna de 
las decenas en la escuela). 
Por lo tanto, es muy útil que nuestro flag se 
active automática mente cuando pasamos de 
255. Precisamente cuando necesitamos (dle- 
varnos uno» nuestro flag se activa convenien. 
temente a uno, por eso lo llamamos Carry flag. 
Explicaremos exactamente cómo trabaja to- 
do el proceso en las series posteriores. 
Como hemos mencionado, el flag también 
se activa cuando el resultado de un cálculo es. 
tá por debajo de cero. El programa IV es una 
variante del programa 111 adaptado a la subs- 
tracción. 
Una vez más ?1 y ?2 son solamente etique. 
tas, queremos decir, que colocamos nuestros 
propios números aquí en las posiciones de me- 
moria &3001, &3003. 
El programa trabaja del mismo modo que 
el programa 111. Si el Carry NO se activa, el 
J P NC sencillamente salta a la terminación 
RET. Si hay un Carry, se realiza la instrucción 
del pitido. 
Como habrá descubierto mientras experi- 
mentaba, el pitido ocurre cuando el segundo 
número es mayor que el primero. Es decir, 
cuando intentamos substraer un número ma- 
yor que el que ya está en el registro A. 
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Piénselo. Si el número que cogemos es ma- 
yor que el número que hemos tomado ante- 
riormente, debemos cruzar el importante «lí- 
mite cero», volviendo otra vez como un reloj 
y activando el Carry flag. 
Lo siguiente es una demostración de lo que 
pasa cuando restamos de 2 números cada vez 
más grandes, veamos: 
2-0 = 2 Carry desactivado. 
2-1 = 1 Carry desactivado. 
2-2 = O Carry desactivado. 
2-3 = 255 Carry activado. 
2-4 = 254 Carry activado. 


DIRECCION OPCODE MNEMONICO 
3000 3E ?1 LD A, ?1 
3002 C6 ?2 ADD A, ?2 
3004 32 F8 2F LD (&2FF81, A 
3007 D2 O F 30 jp NC, &300F 
300A 3E 07 LD A, &07 
300C CD 5A BB CALL CharQut 
300F C9 RET 


Programa 3 
De modo que el Carry flag se activa cuan- 
do el segundo número es mayor que el prime- 
ro. O si lo desea, hacemos una especie de 
comparación, cotejando el número que hay 
en el registro A con el que le restamos. Si el 
segundo es mayor, se activa el Carry flag. 


La importancia de las 
comparaciones 
Puede asombrarnos la cantidad de veces 
que necesitamos comparar byles en código 
máquina, pero el hacerla como hasta ahora 
-usando SUB- no es muy usual. Veamos, 
aunque podemos utilizar el Carry flag con SU B 
de este modo para hacer una comparación ru- 
dimentaria entre un byte y lo que hay en el 
registro A, el contenido del registro A desde 
luego cambiará en el proceso. Después de to- 
do, le hemos restado un número. 
SUB n resta el número n de lo que hay en 
el registro A y almacena el resultado devuel- 
to también en el registro A. 


DIRECCION OPCODE MENMONICO 
3000 3E ?1 LO A. ?1 
3002 D6 ?2 SUB ?2 
3004 32 F8 2 F LD (&2FF8), A 
3007 D2 OF 30 jp NC, &300F 
300A 3E 07 LD A, &07 
300C CD 5A BB CALL CharQuI 
300F C9 RET 


Programa 4 


1 


Esto lo representamos como: 
A < -uA.n 
De todas formas, los diseñadores del Z80 
nos proporcionan una instrucción de campo. 
ración que salva este problema CP n. Esta ins- 
trucción coloca al número en el registro A, le 
resta n, activa los flags convenientemente, pe- 
ro NO devuelve el resultado a A. Sencillamen. 
te, lo descarta, deja sin cambiar el número en 
A. 


DIRECCION OPCODE MNEMONICO 
3000 3E ?1 LD A,?l 
3002 FE ?2 CP ?2 
3004 32 F8 2F LD (&2FF81, A 
3007 D2 OF 30 jp NC, &300F 
300A 3E 07 LD A, &07 
300C CD 5A BB CALL CharQut 
300F C9 RET 


Programa 5 
Por tanto, nos encontraremos con que los 
bytes de memoria y los registros no son afec- 
tados por CP n -sólo los flags son activados 
y desactivados convenientemente-o Es decir: 
- Si el número comparado con A es ma- 
yor que el de A, se activa el Carry flag. 
- Si el número comparado con A es me- 
nor o igual que el de A, se desactiva el Carry 
flag. 
Matemáticamente: 
A < n- u --- > Carry activado. 
A > = nm--- > Carry desactivado. 
El programa V es esencialmente el progra. 
ma IV con el SU B reemplazado por un CP. De 
nuevo, colocaremos nuestros propios núme- 
ros en las posiciones de memoria &3001, 
&3003 y veremos si podemos predecir los pi- 
tidos exactamente. 


DIRECCION OPCODE MNEMONICO 
3000 3E 20 LD A, &20 
3002 CD 5A BB CALL CharQut 
3005 C601 ADD A,l 
3007 D2 02 30 JP NC, &3002 
300A C9 RET 


Programa 6 
Hace falta mirar bien &2FF8 después de eje- 
cutar el programa. Debe probarnos que el 
contenido de A realmente no ha sido cambia- 
do por ep. 
Para ilustrar cómo podemos usar la instruc- 
ción CP, veamos el programa VI. La encon- 
traremos enseguida -de hecho la encontra- 
remos en el primer bucle. 
Como puede ver, escribe todos los caracte. 
res con código comprendido entre &20 y &FF, 
cargando A con &20, escribiendo el caracter 
con este código Ascii, incrementando en uno 
lo que hay en A, saltando atrás con un JP NC 
para escribir A otra vez, incrementarlo de nue- 
vo, y así sucesivamente. 
Finalmente se escribe el caracter correspon- 
diente a &FF y el valor de A incrementando 
en uno, llega «como el reloj)) a cero, acti- 
va el Carry flag y sale del bucle. 



DIRECClON OPCODE MNEMONICO 
3000 3E 1 F LO A, & 1F 
3002 C601 AOO A, 1 
3004 CO 5A BB CALL CharOut 
3007 FEFF CP &FF 
3009 DA 02 30 J P C, &3002 
300C C9 RET 


Programa 1 
Lo que hace es aprovecharse del hecho de 
que el Carry se activa cuando sobrepasamos 
el límite de &FF (255). Alternativamente, po- 
demos usar CP para controlar el último carac- 
ter del bucle y tiene algunas ventajas más. El 
programa VII muestra la idea. 
Fíjese que esta vez hemos añadido uno al 
registro A «antes» de escribirlo. Entonces lo 
comparamos directamente con &FF, ya que es 
el último caracter que queremos imprimir. Es- 
to quiere decir, que cargamos el registro A ini. 
cialmente con & 1 F, pero inmediatamente es 
incrementado a &20 por la instruccián ADD 
A, 1. 


DIRECCION OPCODE MNEMONICO 
3000 3E 5A LO A, &5A 
3002 CO 5A BB CALL CharOut 
3005 0601 SUB 1 
3007 FE 41 CP &41 
3009 02 02 30 JP NC, &3002 
300C C9 RET 


Programa 8 
Ahora hasta que el registro A tenga &FF, 
el número que comparamos con A es mayor 
que el que hay en A, así que el Carry flag es- 
tá activado, de forma que saltamos atrás a la 
cabeza del bucle otra vez con J P C. 
Una vez que el registro A consigue &FF, los 
números que estamos comparando son igua. 
les y el Carry flag se desactiva. 
Podríamos preguntarnos por qué no añadi- 
mos CP o después del ADD A, 1 del progra. 
ma VI. Bueno, si lo piensa no podemos seguir 
el camino del reloj restando o de un número, 
puesto que el Carry no se activará nunca. 


Lo más agradable del uso de CP en bucles 
es que podemos variar el número final fácil- 
mente. Por ejemplo, si queremos escribir has- 
ta Z -Ascii &5A- necesitamos cambiar el CP 
&FF por CP &5A. Y, si queremos comenzar por 
A -Ascii &41- cargamos nuestro acumula- 
dor inicial reemplazando LD A, & 1 F por LD 
A, &40. Recordemos que enseguida le esta- 
mos añadiendo uno al registro. 
Otra ventaja de usar CP para activar el 
Carry mejor que recurriendo al camino del re- 
loj es que nos permite hacer cosas tales como 
escribir el alfabeto hacia atrás, como en el pro- 
grama VIII. 


Como último ejemplo del uso de CP vamos 
a utilizarlo como filtro de entradas fuera de 
rango. 
A menudo en un programa dejamos que la 
gente de su opinión elija entre cinco opciones 
de un menú. EI!os responden pulsando el nú- 
mero comprendido entre 1 y 5, correspondien. 
te a su preferencia. Si pulsan una tecla equi- 
vocada se ignora y el programa espera has. 
ta que se hace la elección válida. 


Menú en código 
máquina 


Así que vamos a escribir un programa que 
espera los números 1,2,3,4 ó 5 como entra. 
das y los saca en pantalla. 
Usaremos Charln para dar entrada a un da- 
to pulsando una tecla y entonces controlará 
si está en el rango con dos comparaciones. 


DIRECCION OPCODE MNEMONICO 
3000 CO 18 BB CALL Charln 
3003 FE 31 CP &31 
3005 DA 00 30 J P C, &3000 
3008 FE 36 CP &36 
300A 02 00 30 JP NC, &3000 
3000 CO 5A BB CALL CharOut 
3010 C9 RET 


Programa 9 


ódig!, 


Hay que recordar que Charln coloca el va- 
lor Ascii del caracter cuya tecla se ha pulsado 
en el registro A, así que necesitaremos revi- 
sar qué valores están en el rango &31 0&35, 
los códigos Ascii de 1 a 5. 
En otras palabras, el número en el registro 
A debe ser mayor o igual a &31, nuestra pri. 
mera comparación. También debe ser menor 
que &36, nuestra segunda comparación. 
El programa IX lo pone en práctica: 
El CP &31 comprueba que el número en el 
registro A es &31 o mayor. Si no, se activa el 
Carry y saltamos atrás, al comienzo para es- 
perar otra entrada, puesto que el caracter ele- 
gido era «demasiado pequeño». 
Si conseguimos pasar este control, se com- 
para el número con &36. Necesitamos que el 
número que hay en el registro A sea menor 
que éste, así que en el momento en que nece. 
sitemos el Carry se activa. Si no es así el valor 
de la tecla es «demasiado grande») así que, sal- 
taremos atrás para conseguir otra entrada. 
Si, no obstante, el Carry se activa, sencilla- 
mente continuamos. Si el programa ha llega- 
do hasta este punto es que el número en A está 
comprendido en el rango que queremos así 
que CALL CharOut y RET. 
Una vez que hemos visto cómo trabaja ¿por 
qué no intentamos escribirlo aceptando sola- 
mente las letras mayúsculas del alfabeto, &41 
a &5A? No nos resultará demasiado difícil. 
Bueno, pues esto es todo de momento. Hay 
muchas más cosas que pueden hacerse con CP 
y bucles en general, lo veremos próximamen- 
te. 
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En algunos programas aparece el 
guarismo «A», sin embargo no con- 
seguimos localizarlo en el teclado. 
¿Tiene algún sustituto? ¿Hay que ha- 
cer un programa que nos lo dibuje? 
¿Cómo, una vez dibujado, lo prodre- 
mos introducir en el listado del pro- 
grama que lo precise? 
Alvarez Márquez Montoro 
(Granada). 
El guarismo al que te refieres es el 
carácter que se obtiene pulsando la 
tercera tecla de la fila superior del te- 
clado del Amstrad empezando por 
la derecha, y corresponde al signo 
de exponenciacián. 
Sucede que la mayoría de las im- 
presoras interpreta dicho carácter 
camo tú indicas, y así aparece en los 
listados. 



 


¿Cuántas Josticks se puden «enchu- 
far» al port trasero del Amstrad? 
¿Pueden salir modelos nuevos del 
Amstrad? 
¿La gama de periféricos para el 
Amstrad irá en aumento? 
¿Es el Amstrad un ordenador 
con futuro? 
Raúl López I Madrid. 
7, Se le pueden enchufar dos 
Joysticks. 
2. Sí que pueden salir. Hasta aho- 
ra, el parque de Amstrad incluye 
el CPC464, CPC664, CPC6 728 y 
PCW8256. No tenemos noticias de 
la aparicián de nuevos modelos a 
corto plazo. 
3. Amstrad ya posee los perifé- 
ricos más importantes de uso común 
en ordenadores, como unidades de 
disco e impresoras. Si te refieres a co- 
sas como modems, plotters, digitali- 
zadores de imagen, lápices ópticos, 
etc., el futuro dirá. Lo probable, co- 
mo en el caso de las demás máqui- 
nas, es que vayan saliendo poco a 
poco. 
4. A esta pregunta debes respon- 
der tú, los lectores de nuestra revis- 
ta y todas las personas que tengan, 
o piensen tener, un Amstrad. En 
nuestra opinión, sí. 


Estimados amigos del Micro- 
hobby Amstrad: 
l. ¿De cuántos pixel está com- 
puesto un carácter? 
2. ¿Cuántos colores se pueden po- 
ner en un carácter? ¿Cuántos gráfi- 
cos se pueden definir? 
3. ¿Tiene sprites? 
4, ¿El sonido sale por el monitor? 
y si no es así, ¿sale con el volumen 
bastante alto? 


5. Me parece que el monitor está 
muy cerca del ordenador, ¿se podría 
separar a un metro y medio? 
Gracias. 
Miguel Acedo (Madrid). 
7. Un carácter está compuesto 
de 64 pixels, distribuidos en uno re- 
tículo de 8x8. Sin embargo, el as- 
pecto del carácter cambio con el mo- 
do de pantalla, alcanzando su tama- 
ño máximo en el modo O (20 por lí- 
nea) y el mínimo en el modo 2 (80 
por línea), 40 por línea en el modo 7. 
2. También depende del modo: 
76 en el O, 4 en el 7 y 2 en el 2. 
3. Sale del ordenador, pero exis- 
te solido stereo. 
4. Puedes separar el monitor del 
ordenador hasta que dé el cable. Si 
eso no te parece suficiente, añade 
más cable. 


¿A partir de qué posición de me- 
moria está mapeada la pantalla en 
memoria? 
Yo sé programar en ensamblador 
para ellntel 8080, pero no sé cómo 
hacerlo con el ensamblador y el de- 
bugger del disco de CP/M, 
¿Me pueden indicar cómo se utili- 
zan? 
¿Qué comandos hay que poner 
para ensamblar un programa? ¿Hay 
que montarlo? ¿Y para ejecutar? 
Javier Planellas Giner (Barcelona) 
Lo memoria de pantalla normal- 
mente abarca de 105 posiciones 
&COOO a &FFFF, es decir, solapo con 
el intérprete Basic. 
Decimos normalmente porque uno 
de las cosos más curiosas de la pan- 
talla del Amstrad es que se «trasla- 
da» o través de la memoria por 
Hardware. 
En el firmware del ordenador exis- 
te una rutina que informa, entre 
otras cosas, del comienzo de lo me- 
moria de pantalla, pero requiere el 
conocimiento del lenguaje ensambla- 
dar del 280, 
Su dirección es &BCOB y devuelve 
en HL el offset de pantalla y en el 
acumulador el byte más significativo 
de lo dirección de comienzo. Lo ver- 
dadera dirección se obtiene realizan- 
do un OR lógico entre el acumulador 
y el registro H, de esto formo: 
CALL &BCOB 
OR H 
LO H,A 
RET 
Cuando esto rutina retorne, lo di- 
rección de la primera posición de 
pantalla estará en el registro HL. 
Respecto o tu pregunto del ensam- 


in duda 
alguna 


A través de esta sección se 
pretende resolver, en la medida 
de lo posible, todas las posibles 
dudas que «atormenten» a to- 
das las personas interesadas en el 
mundo del AMSTRAD, sean o no 
poseedores de uno y, si lo son, se 
encuentren en cualquier nivel de 
destreza en su manejo. 
Semanalmente, aparecen en 
estas páginas las consultas de la 
mayor cantidad de usuarios po- 
sible; ello redundará en un mejor 
servicio y en un contacto más es- 
trecho entre todos nosotros a tra- 
vés de la revista. 
SIN DUDA ALGUNA está 
abierta a todos. 


Seréis, semana a semana, los 
encargados de construir esta pá- 
gina con vuestras consultas. En 
más de una ocasión, aquello que 
os preocupa ya ha sido contesta- 
do antes a otro lector o, por el 
contrario, puede suceder que de- 
terminada consulta aclare muchos 
quebraderos, de cabeza de otros 
aficionados. 
Las cartas «sin duda algu- 
na», nos servirán de gran ayuda. 
Gracias a ellas podremos ir eva- 
luando vuestras necesidades y, de 
este modo, modificando el conte- 
nido de MICROHOBBY AMS- 
TRAD acorde con ello. iOS espe- 
ramos! 


blador y debugger CPIM, estos pro- 
gra,mas son complicados de manejar 
y tienen una gran cantidad de co- 
mandos. Por rozón del escaso espa- 
cio que disponemos, no podemos lis- 
tarlos todos e indicar además cómo 
se usan. 
Cualquier libro, de 105 docenas 
que existen sobre CPIM podrá ayu- 
darte. 
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Con el objeto de fomentar las rela- 
ciones entre los usuarios de AMSTRAD, 
MERCADO COMUN te ofrece sus pági- 
nas para publicar los pequeños anuncios 
que relacionados con el ordenador y su 
mundo se ajusten al formato indicado a 
continuación. 
En MERCADO COMUN tienen cabida, 
anuncios de ventas, compras, clubs de 
usuarios de AMSTRAD, programadores, 
y en general cualquier clase de anuncio 
que pueda servir de utilidad a nuestros 
lectores. 
Envíanos tu anuncio mecanografiado 
a: HOBBY PRESS, S.A. 
AMSTRAD SEMANAL. 
Apartado de correos 54.062 
28080 MADRID 
¡ABSTENERSE PIRATAS! 


Intercambio programas para 
Amstrad, tanto juegos como 
utilidades. Interesados escribir a: 
Fco. Javier Punta Sánchez. Pral. 
Maestro Guridi, 3 - 2. o D. 41010 
Sevilla. ¡Mandad lista! 
................. 


Vendo Amstrad CPC-664 
monitor verde con disco Logo- 
CPC-Demo, garantía Indescomp 
07/85. Por 90.000 ptas. Tel 
(93) 699 17 52 . Tardes. Manuel 
Miras Más. Justicia, 12 - l. Rubí 
(Barcelona). 
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Ordenadores personales y de gesliÚn 
Aplicaciones para arquitectura 
. Amslrad · Dragón 
· Sindair . lmpresaras 
. Camlnadore · ¡'vlonitures 
. Philips · Periféricos 
· Canon · Libros 
. S p e e ( r a v í d e o · Re\'istas 
Sl
n'imo
 a pro"illcia
 
CI Rllrqlllllo, 15. 
Teléfo//o: (91) 2325737. !IIadrid. 


GANA 100.000 PESETAS 
CON MICROHOBBY 
j MSTRAD SEMANAL 


Porque pretendemos que AMSTRAD SE- - Todos estos datos deberán ir escritos a má- 
MANAL sea también vuestra revista, hemos quina o con letra clara para mayor comprensión 
abierto una sección en la que se publicarán 105 del programa. 
mejores programas originales recibidos en nues- - En una sola cinta puede introducirse más 
tro redacción. Vosotros seréis los encargados de de un programa. 
realizar estos páginas, en las que podréis opor- - Una vez publicado, AMSTRAD SEMA- 
tar ideas y programas interesantes para otros NAL abonará al autor del programa de 
lectores. 15.000 a 100.000 pesetas, en concepto de 
Las condiciones son sencillas: derechos de autor. 
- Los programas se enviarán a AMSTRAD - Los autores de los programas selecciona, 
SEMANAL en una cinta de cassette, sin protec- dos para su publicación, recibirán una comuni. 
ción en el software, de forma que sea posible cación escrita de ello en un plazo no superior 
obtener un listado de 105 mismos. a dos meses a partir de la fecha en que su pro- 
- Cada programa debe ir acompañado de grama llegue a nuestra rdacción. 
un texto explicativo en el cual se incluyan: - AMSTRAD SEMANAL se reserva el de, 
- Descripción general del programo. recho de publicación o no del prog-rama. 
- Tabla de subrutinas y variables utilizadas, - Todos 105 programas recibidos quedarán 
explicando claramente la función de cado en poder de AMSTRAD SEMANAL. I 
una de ellas. - Los programas sospechosos de plagio se. 
- Instrucciones de maneio. rán eliminados inmediatamente. 
¡ENVIANOS TU PROGRAMA! 
Indicando claramente en el sobre: 
AMSTRAD SEMANAL 
a HOBBY PRESS, S. A. La Granja, n. o 8. Poi. 
nd. Alcobendas (Madrid) 
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Desearía contactar con usuarios 
de Amstrad CPC-464, para 
intercambio de ideas, libros, 
programas y cosas referentes al 
firmware, periféricos, etc... 
Francisco Javier Garda Casado. 
San Pedro Bautista, 16. 05005 
Avila. 


................. 


Desearía contactar con usuarios 
del CPC-464 de toda España y en 
especial de Vigo para intercambio 
de información y programas. 
Interesados llamar al teléfono 
(986) 27 07 35 y preguntar por 
Javi. 


................. 


Vendo: 
Ordenador BBC Modelo B con 
muy poco USO¡ 60.000 ptas. 
Ordenador Amstrad CPC464 
comprado en mayo 1985 con 30 
juegos originales¡ 65.000 ptas. 
Impresora Seikosha GP-100A¡ 
30.000 ptas. 
Unidad de diskette Standard¡ 
15.000 ptas. 
Alfonso Oliva Delgado. Satsuma, 
13.41006 Sevilla. Te!. 
(954) 67 33 20. 
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Especialistas 
en 
SOFTWARE 
para la 
pequeña y 
mediana 
empresa 
... 
· AMSTRAD 6128 
. AMSTRAD 8256 
· IBM Y compatibles 


... 
Programas de g
stión 
integrados 
- 
C/. Galileo, 25 
Entreplanta A 
Tels.447 97 51 . 447 98 09 
28015 Madrid 
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SOLICITUD DE CINTAS DE PROGRAMAS Y NUMEROS ATRASADOS 


o Deseo recibir en mi domicilio, al precio de 675 ptas. cada una, las siguientes cintas con los programas 
publicados por Microhobby AMSTRAD Marco con una (X) la(s) cinta(s) que deseo: 
O Cinta n.o 1 (contiene programas publicados en revistas 1 al 4 inclusive) 
O Cinta n.o 2 (contiene programas publicados en revistas 5 al 8 inclusive) 
O Cinta n.o 3 (contiene programas publicados en revistas 9 al 12 inclusive) 
O Cinta n.o 4 (contiene programas publicados en revistas 13 al 16 inclusive) 
O Cinta n,o 5 (contiene programas publicados en revistas 17 al 20 inclusive) 


o Deseo recibir en mi domicilio, al precio de 150 ptas. cada uno, los siguientes números atrasados de 
Microhobby AMSTRAD 


Nota: Por razones admlnlstrallvas. no podemos admitir solicitudes de envio de cintas o numeras sueltos con pago contra reembolso o 
Tarlela de Crédito. Por lavar, envia talón por el importe o giro poslal. 
Si la forma de pago elegida es talón bancario, remítelo Junto con este cupón en un sobre cerrado a la misma dirección. 
Lascintas de programas se edilan una cada mes. Si solicitas vanas las recibirás sucesivamente, conlorme sean editadas. No se cobran 
gas los de envio por las cintas y numeras sueltos. 


NOMBRE 
APELLIDOS 
DOMICILIO 
CIUDAD 
C. POSTAL 


EDAD 


TELEFONO 


PROVINCIA 
PROFESION 


Marco con una (X) en el casillero correspondiente la forma de pago que mas me conviene, 
O Talón bancariO adjunto a nombre HOBBY PRESS, S. A. O Giro Postal N." 
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Knigt Lore y Alien 8 
con sus lllagníficos grá- 
ficos tridimensionales y 
su alto nivel de difi- 
cultad son, sencillamen- 
te, lo mejor para tu 
Arnstrad. 
P.V.P. unidad: 1.950 pts. 
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Santa Cruz de Marcenado, 31 
28015 MADRID 
Teléts. (91) 248 8213 
(91) 242 50 59 


T.L.L. Lo que fue todo 
un éxito para el Zx 
Spectrum, ahora los 
tienes disponible para 
tu Amstrad 
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\ 
Zx Spectrum: 1.595 pts.. 
Amstrad: 1.900 pts., 
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Si deseas recibir más información y propaganda de nuestros programas y de nuestras 
interesantes ofertas, por favor, rellena y envíanos este cupón. 
Nombre ...... o . ... . .. .. . o o o .. . . ...... . . . .... . ...... . . . . . . .. . o o. . . . . . . .. . . o . . .. .. . .. . . . . .. .. Edad ............... 


\ 


1¡, '..",'l' 
'-" -!i
't(.I"'"" 
\, V' =l
 
 =:' 
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Dirección ............................. o o . o . .. o . . . . . . . . . . . . . o o . . . . . . . . . . . . . o o . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . o . . 
Locali dad - Provincia ......... o o . . . . . . . . . . o . o . . . . . . . . . . o o . . . . . . . . . . . . . . . o o . . . . . . . . . . o . . o . o . . . . . . . . . . . . . . o . o o . o . . . . 
Ordenador ..... ...... ..... ........ Programas favoritos .......... o.... ......... o o ............. ....... .... 


Fabuloso partido de 
baloncesto en el que 
podrás ensayar tus 
tiros favoritos contra el 
ordenador o frente 
a tu amigo 
Amstrad: 
Spectrum: 


ORNAD. 
apw LEVE I 


2.100 ptas. 
2.100 ptas. 




 


Conl 
ciones eni 
MERCA DI 
nas para I 
que relaci 
mundo se 
continuac 
En MER 


anuncIos 
usuarios c 
y en gene 
que pued 
lectores. 
Envíanos tu anuncio mecanografiado 
a: HOBBY PRESS, S.A. 
AMSTRAD SEMANAL. 
Apartado de correos 54.062 
28080 MADRID 
¡ABSTENERSE PIRATAS! 


· Comlllodore · ¡'vlonitores 
. Philips · Periféricos 
· Canon · Libros 
. S p e e t r a v í d e o . Revistas 
Srn'imos a IJrO\'incias 
CI Hllrl/lIillo. 15. 
Teléfo/lo: (91) 2325737, Madrid. 


GANA 100.000 PESETAS 
CON MICROHOBBY 

 MSTRAD SEMANAL 


Porque pretendemos que AMSTRAD SE, - Todos estos datos deberán ir escritos a má. 
MANAL sea también vuestra revista, hemos quina o con letra clara para mayor comprensión 
abierto una sección en la que se publicarán los del programa, 
mejores programas originales recibidos en nues- - En una sola cinta puede introducirse más 
tra redacción. Vosotros seréis los encargados de de un programa. 
realizar estas páginas, en las que podréis apor- - Una vez publicado, AMSTRAD SEMA, 
tal' ideas y programas interesantes para otros NAL abonará al autor del programa de 
lectores. 15.000 a 100.000 pesetas, en concepto de 
Las condiciones son sencillas: derechos de autor. 
- Los programas se enviarán a AMSTRAD - Los autores de los programas selecciona, 
SEMANAL en una cinta de cassette, sin protec. dos para su publicación, recibirán uno comuni- 
ción en el software, de forma que sea posible cación escrita de ello en un plazo no superior 
obtener un listado de los mismos. a dos meses o partir de la fecha en que su pro. 
- Cado programa debe ir acompañado de grama llegue a nuestro rdacción. 
un texto explicativo en el cual se incluyan: - AMSTRAD SEMANAL se reserva el de- 
- Descripción general del programa. recho de publicación o no del progfama. 
- Tabla de subrutinas y variables utilizadas, - Todos los programas recibidos quedarán 
, 
explicando claramente la función de cada en poder de AMSTRAD SEMANAL. 
una de ellas. - Los programas sospechosos de plagio se- 
- Instrucciones de maneio. rán eliminados inmediatamente. 
¡ENVIANOS TU PROGRAMA! 
Indicando claramente en el sobre: 
AMSTRAD SEMANAL 
a HOBBY PRESS, S. A. La Granja, n. o 8. Poi. I"d. Alcobendas (Madrid) 
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HOBBY PBESS,S.A. 


Apartado de Correos 


nO 54.062 (ApArtados Altos) 


MADRID 


muy poco USOj 60.000 ptas. 
Ordenador Amstrad CPC464 
comprado en mayo 1985 con 30 
juegos originalesj 65.000 ptas. 
Impresora Seikosha GP-100Aj 
30.000 ptas. 
Unidad de diskette Standardj 
15.000 ptas. 
Alfonso Oliva Delgado. Satsuma, 
13.41006 Sevilla. Te!. 
(954) 67 33 20. 
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Especialistas 
en 
SOFTWARE 
para la 
pequeña y 
mediana 
empresa 
... 
· AMSTRAD 6128 
· AMSTRAD 8256 
· IBM Y compatibles 


... 
Programas de ge.stión 
integrados 
- 
C/. Galileo. 25 
Entreplanta A 
Tels.447 97 51 . 447 98 09 
28015 Madrid 
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Dirige a tus cinco vortons y al lasertron hasta 
la «Zona Cero» por la única vía libre que 
j queda en la tierra. Todo ello en un increíble 
escenario tridimen
iondl que dan al programa 
un realismo sin límites. 
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 Amstrad y ZX Spectrum: 1.900 ptas. 
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Knigt Lore y Alien 8 
con sus magníficos grá- 
ficos tridimensionales y 
l su alto nivel de difi- 
cultad son, sencillamen- 
I te, lo mejor para tu 
Amstrad. 
í P.V.P. unidad: 1.950 pts. 
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COMSAT 60 FLlGHT SIMULA OR 
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Fabuloso simulador 
de vuelo con despegue 
vertical desde un 
portaaviones, con el que 
podrá mantener un 
combate con los aviones 
enemigos, hacer 
ensayos de maniobras, 
practicar vuelo, ... 
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Santa Cruz de Marcenado, 31 
28015 MADRID 
Teléfs. (91) 248 8213 
(91) 242 50 59 


T.L.L. Lo que fue todo 
un éxito para el Zx 
Spectrum, ahora los 
tienes disponible para 
tu Amstrad 


Zx Spectrum: 1,595 pts.. 
Amstrad: 1.900 pts. 


Dirección ................ o . . . . . . . . . . . . . . o . . . o o . . . . . . . . . . . . . . . . . . . . . . . . o o o . . . . . . . . . . . . . . o o o . . . . . . . . . . . . . . . o . . . . . . . . . . 
Localidad-Provincia ............. o o............ o....... o o.. o.... ......... o. . o......... o...... o o. ....,. o....... o.. 
Ordenador ............. o.......... Programas favoritos ..... o. o o....... o.. ....... ............ ........ .... 
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Fabuloso partido de 
baloncesto en el que 
podrás ensayar tus 
tiros favoritos contra el 
ordenador o frente 
a tu amigo 
Amstrad: 2.100 ptas. 
Spectrum: 2.100 ptas. 
Si deseas recibir más información y propaganda de nuestros programas y de nuestras 
interesantes ofertas, por favor, rellena y envíanos este cupón. 
Nombre .......... o... . . . .. o .. . .. . . . . . .. o . . .. . .. . ..... . . . . . o o .. . .. . . o o .. . .. . . o o o.. . . o .... . .. Edad .............., 
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DISPONIBLE PARA ZX SPECTRUM 
AMSTRAD 
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